Source Code
|
These source-code files were transcribed from scans made from Don Eyles's personal
copy of BURST120 (SUNBURST 120). They were scanned at archive.org's Boston
facility, and the scanning was sponsored by Mike Stewart. The code was transcribed
from these scans by a team of volunteers who are referenced in the program
comments. Comments from the original source code are in ALL-CAPS, whereas
comments added later in transcription are in Mixed-Case. In some cases, where
similar code blocks exist in previously-transcribed AGC programs (primarily
Luminary 99, from Apollo 11) those code blocks were used as a starting point and
then corrected to agree with the BURST120 scans. The full scans are available
at the Virtual AGC
project's collection at archive.org, while more-convenient reduced-size (but reduced-quality)
images are available at
the main Virtual AGC website. Report any errors noted by creating an
issue report at the Virtual AGC
project's GitHub repository. Notations on the program listing read, in part:YUL SYSTEM FOR AGC: REVISION 0 OF PROGRAM BURST120 BY NASA 2021106-031 DEC 7, 1967 THIS LISTING IS A COPY OF A VERSION OF THE PROGRAM INTENDED FOR USE IN THE ON-BOARD PRIMARY GUIDANCE COMPUTER IN THE UNMANNED FLIGHT OF APOLLO LUNAR MODULE 1 --- THE AS206 MISSION.Note that the date is the date of the printout, not the date of the program revision. |
016961,000002: ## Copyright: Public domain.
016962,000003: ## Filename: IMU_PERFORMANCE_TEST_2.agc
016963,000004: ## Purpose: A module for revision 0 of BURST120 (Sunburst). It
016964,000005: ## is part of the source code for the Lunar Module's
016965,000006: ## (LM) Apollo Guidance Computer (AGC) for Apollo 5.
016966,000007: ## Assembler: yaYUL
016967,000008: ## Contact: Ron Burkey <info@sandroid.org>.
016968,000009: ## Website: www.ibiblio.org/apollo/index.html
016969,000010: ## Mod history: 2016-09-30 RSB Created draft version.
016970,000011: ## Note that there are similarities with
016971,000012: ## Luminary 99 file of the same name, but
016972,000013: ## it was different enough that it just
016973,000014: ## seemed easier to me to start from scratch.
016974,000015: ## 2016-10-18 RSB However, the Aurora 12 file, which has been
016975,000016: ## transcribed in the meantime is actually very
016976,000017: ## similar. This file was thus created by correcting
016977,000018: ## the Aurora 12 version against the Sunburst 120
016978,000019: ## scanned program listing.
016979,000020: ## 2016-10-31 RSB Typos.
016980,000021: ## 2016-11-02 RSB More typos.
016981,000022: ## 2016-12-05 RSB Comment-proofing with octopus/ProoferComments
016982,000023: ## completed, changes made.
016983,000024: ## 2017-06-08 RSB Fixes (comments) identified while transcribing
016984,000025: ## SUNBURST 37.
016985,000026:
|
|
Page 411 |
016987,000028: 24,2000 BANK 24
016988,000029: 24,2000 E5,1400 EBANK= XSM
016989,000030:
016990,000031:
016991,000032: 24,2000 37767 IMUTEST CA ZERO # DRIFT AND SCALE FACTOR TEST
016992,000033: 24,2001 55576 TS DRIFTT
016993,000034: 24,2002 55742 TS GEOCOMPS
016994,000035: 24,2003 33714 CAF 1SECX
016995,000036: 24,2004 55744 TS 1SECXT
016996,000037:
016997,000038: 24,2005 06112 TC INTPRET
016998,000039: 24,2006 77624 CALL
016999,000040: 24,2007 30553 LATAZCHK
017000,000041: 24,2010 77776 EXIT
017001,000042: 24,2011 37763 CA ONE
017002,000043: 24,2012 55544 TS POSITON
017003,000044:
017004,000045: 24,2013 54344 TS DSPTEM2 +2
017005,000046: 24,2014 37763 GEOIMUTT CA ONE # COMPASS COMES IN HERE
017006,000047: 24,2015 54400 TS THETAD
017007,000048: 24,2016 54401 TS THETAD +1
017008,000049: 24,2017 54402 TS THETAD +2
017009,000050: 24,2020 05206 TC BANKCALL
017010,000051: 24,2021 26000 CADR IMUZERO
017011,000052: 24,2022 05206 TC BANKCALL
017012,000053: 24,2023 26751 CADR IMUSTALL
017013,000054: 24,2024 12250 TCF ENDTEST1
017014,000055: 24,2025 37767 IMUBACK CA ZERO
017015,000056: 24,2026 54343 TS DSPTEM2 +1
017016,000057: 24,2027 55537 TS NDXCTR
017017,000058: 24,2030 55574 TS TORQNDX
017018,000059: 24,2031 55575 TS TORQNDX +1
017019,000060: 24,2032 33644 CAF TESTTIME
017020,000061: 24,2033 54342 TS DSPTEM2
017021,000062: 24,2034 05206 TC BANKCALL # ISS RETURNS IN COARSE ALIGN MODE TO
017022,000063: 24,2035 26065 CADR IMUCOARS # ENABLE OPERATOR TO DECIDE WHAT TO DO
017023,000064: # ABOUT GIMBAL LOCK
017024,000065: 24,2036 11742 CCS GEOCOMPS
017025,000066: 24,2037 02042 TC +3
017026,000067: 24,2040 03576 TC SHOWLD
017027,000068: 24,2041 03605 TC SHOW
017028,000069:
017029,000070:
017030,000071:
017031,000072: 24,2042 05206 TC BANKCALL
017032,000073: 24,2043 26751 CADR IMUSTALL
017033,000074: 24,2044 02250 TC ENDTEST1
017034,000075: 24,2045 03353 TC NBPOSPL
017035,000076: 24,2046 03104 TC POSGMBL
|
|
Page 412 |
017037,000078: 24,2047 02113 TC PIPACHK # IF MGA IS 60DEG+ PROG WILL STAY IN COARS
017038,000079: # ALIGN AND MEASURE VERITCAL PIPA RATE
017039,000080: 24,2050 03133 TC FALNE
017040,000081: 24,2051 05206 TC BANKCALL
017041,000082: 24,2052 26751 CADR IMUSTALL
017042,000083: 24,2053 12250 TCF ENDTEST1
017043,000084: 24,2054 11742 CCS GEOCOMPS
017044,000085: 24,2055 02076 TC JUMPLOAD
017045,000086: 24,2056 06112 GUESS TC INTPRET # CALCULATE -COS LATITUDE AND SIN LATITUDE
017046,000087: 24,2057 71545 DLOAD COS # FOR ESTIMATE
017047,000088: 24,2060 02511 LATITUDE
017048,000089: 24,2061 72476 DCOMP SL1
017049,000090: 24,2062 16573 STODL WANGI
017050,000091: 24,2063 02511 LATITUDE
017051,000092: 24,2064 72556 SIN SL1
017052,000093: 24,2065 26571 STOVL WANGO # LOAD TRANSITION MATRIX INTO ERASABLE
017053,000094: 24,2066 11716 GEORGED
017054,000095: 24,2067 26721 STOVL TRANSM1
017055,000096: 24,2070 11724 GEORGEC
017056,000097: 24,2071 26727 STOVL TRANSM1 +6
017057,000098: 24,2072 11732 GEORGEB
017058,000099: 24,2073 02735 STORE TRANSM1 +12D
017059,000100: 24,2074 77776 EXIT
017060,000101: 24,2075 02077 TC +2
017061,000102: 24,2076 04724 JUMPLOAD TC FREEDSP # FREE DISPLAY IF IN GYROCOMPASS
017062,000103: 24,2077 03621 TC LOADGTSM
017063,000104: 24,2100 05206 TC BANKCALL
017064,000105: 24,2101 72014 CADR ESTIMS
017065,000106: 24,2102 04161 TORQUE TC PHASCHNG # FILTER RETURNS AFTER TORQUE AND ER SET
017066,000107: 24,2103 00005 OCT 00005
017067,000108: 24,2104 37767 CA ZERO
017068,000109: 24,2105 54342 TS DSPTEM2
017069,000110: 24,2106 31640 CA DRIFTI
017070,000111: 24,2107 54343 TS DSPTEM2 +1
017071,000112: 24,2110 51544 INDEX POSITON
017072,000113: 24,2111 55551 TS SOUTHDR -1
017073,000114: 24,2112 03605 TC SHOW
017074,000115:
017075,000116: 24,2113 51537 PIPACHK INDEX NDXCTR # TORQUE PLATFORM TO CORRECT LEVELING ERR
017076,000117: 24,2114 02115 TC +1 # IN PREPARATION TO MEASURING VERTICAL
017077,000118: 24,2115 05206 TC BANKCALL # PIPA OUTPUT PULSE RATE
017078,000119: 24,2116 30424 CADR EARTHR
017079,000120:
017080,000121: 24,2117 33647 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
017081,000122: 24,2120 55632 TS DATAPL +4
017082,000123: 24,2121 37752 CA BIT10 # IN THE ALLOTED TIME INTERVAL
017083,000124: 24,2122 55527 TS LENGTHOT
017084,000125: 24,2123 37763 CA ONE
017085,000126: 24,2124 55673 TS RESULTCT
017086,000127: 24,2125 37767 CA ZERO # ZERO PIPA COUNTER INITIALLY
|
|
Page 413 |
017088,000129: 24,2126 51541 INDEX PIPINDEX
017089,000130: 24,2127 54037 TS PIPAX
017090,000131: 24,2130 55626 TS DATAPL
017091,000132: 24,2131 33661 CA DEC56 # LOOP 56 TIMES 5.12 SEC "ACH. EACH INCR.
017092,000133: 24,2132 03214 TC WAITLOOP # WILL ALSO CORRECT EARTH RATE
017093,000134: 24,2133 00004 INHINT
017094,000135: 24,2134 02776 TC CHECKG
017095,000136: 24,2135 00003 RELINT
017096,000137: 24,2136 03072 TC DATALD
017097,000138: 24,2137 37766 CA FIVE
017098,000139: 24,2140 55673 TS RESULTCT
017099,000140: 24,2141 51537 INDEX NDXCTR
017100,000141: 24,2142 02143 TC +1
017101,000142: 24,2143 05206 TC BANKCALL
017102,000143: 24,2144 30424 CADR EARTHR
017103,000144: 24,2145 11676 CCS COUNTPL
017104,000145: 24,2146 03236 TC WAITLP2
017105,000146: 24,2147 11627 CCS DATAPL +1
017106,000147: 24,2150 02154 TC +4
017107,000148: 24,2151 04736 TC CCSHOLE
017108,000149: 24,2152 41632 CS DATAPL +4
017109,000150: 24,2153 55632 TS DATAPL +4
017110,000151: 24,2154 00006 EXTEND
017111,000152: 24,2155 41627 DCS DATAPL
017112,000153: 24,2156 21633 DAS DATAPL +4
017113,000154:
017114,000155: 24,2157 06112 TC INTPRET
017115,000156: 24,2160 45345 DLOAD DSU
017116,000157: 24,2161 02635 DATAPL +6
017117,000158: 24,2162 02631 DATAPL +2
017118,000159: 24,2163 56325 PDDL DDV
017119,000160: 24,2164 02633 DATAPL +4
017120,000161: 24,2165 41325 PDDL DMP
017121,000162: 24,2166 11651 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
017122,000163: 24,2167 77634 RTB
017123,000164: 24,2170 33520 SGNAGREE
017124,000165: 24,2171 00343 STORE DSPTEM2
017125,000166: 24,2172 77776 EXIT
017126,000167: 24,2173 03605 TC SHOW
017127,000168: 24,2174 33642 VERTDRFT CA 3990DEC # 3900 SECONDS FOR VERTICAL DRIFT
017128,000169: 24,2175 55527 TS LENGTHOT
017129,000170: 24,2176 05206 TC BANKCALL # THIS WILL CORRECT FOR EARTH RATE DURING
017130,000171: 24,2177 30424 CADR EARTHR # TIME SPENT IN SHOW ABOVE*
017131,000172: 24,2200 30032 CA CDUX # STOORE AXIS FOR LAB CALC OF DRIFT
017132,000173: 24,2201 55530 TS LOSVEC
017133,000174: 24,2202 51544 INDEX POSITON
017134,000175: 24,2203 41550 CS SOUTHDR -2
017135,000176: 24,2204 55576 TS DRIFTT
017136,000177: 24,2205 03621 TC LOADGTSM
017137,000178: 24,2206 37767 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
|
|
Page 414 |
017139,000180: 24,2207 55400 TS XSM
017140,000181: 24,2210 55401 TS XSM +1
017141,000182: 24,2211 55404 TS XSM +4
017142,000183: 24,2212 55405 TS XSM +5
017143,000184: 24,2213 55406 TS YSM
017144,000185: 24,2214 55407 TS YSM +1
017145,000186: 24,2215 55412 TS YSM +4
017146,000187: 24,2216 55413 TS YSM +5
017147,000188: 24,2217 55414 TS ZSM
017148,000189: 24,2220 55415 TS ZSM +1
017149,000190: 24,2221 55420 TS ZSM +4
017150,000191: 24,2222 55421 TS ZSM +5
017151,000192: 24,2223 37743 GUESS1 CAF POSMAX
017152,000193: 24,2224 55574 TS TORQNDX
017153,000194: 24,2225 55575 TS TORQNDX +1
017154,000195: 24,2226 05206 TC BANKCALL
017155,000196: 24,2227 72014 CADR ESTIMS
017156,000197: 24,2230 04161 VALMIS TC PHASCHNG
017157,000198: 24,2231 00005 OCT 00005
017158,000199: 24,2232 31636 CA DRIFTO
017159,000200: 24,2233 54343 TS DSPTEM2 +1
017160,000201: 24,2234 30032 CA CDUX # STORE OG ANGLE FOR LAB CALC OF DRIFT**
017161,000202: 24,2235 55531 TS LOSVEC +1
017162,000203: 24,2236 37767 CA ZERO
017163,000204: 24,2237 54342 TS DSPTEM2
017164,000205: 24,2240 03605 TC SHOW
017165,000206:
017166,000207:
017167,000208:
017168,000209: 24,2241 37763 FINISH CA ONE
017169,000210: 24,2242 61544 AD POSITON
017170,000211: 24,2243 54344 TS DSPTEM2 +2
017171,000212: 24,2244 37762 CA TWO
017172,000213: 24,2245 55546 TS QPLACE
017173,000214: 24,2246 05206 TC BANKCALL
017174,000215: 24,2247 22342 CADR TSELECT -6
017175,000216: 24,2250 05206 ENDTEST1 TC BANKCALL
017176,000217: 24,2251 30770 CADR ENDTEST
017177,000218:
|
|
Page 415 |
017179,000220: 24,2252 33652 OPCHK CAF DELYOFF # AUTOMATIC TEST FOR SYSTEM OPERATION
017180,000221: 24,2253 00006 EXTEND
017181,000222: 24,2254 02030 RAND 30 # CHECK TO SEE IF IMU IS ON
017182,000223: 24,2255 10000 CCS A
017183,000224: 24,2256 02444 TC ALARMS
017184,000225: 24,2257 33645 CAF V16N20S
017185,000226: 24,2260 04657 TC NVSBWAIT
017186,000227:
017187,000228: 24,2261 04724 TC FREEDSP
017188,000229: 24,2262 05206 TC BANKCALL
017189,000230: 24,2263 26000 CADR IMUZERO
017190,000231: 24,2264 05206 TC BANKCALL
017191,000232: 24,2265 26751 CADR IMUSTALL
017192,000233:
017193,000234: 24,2266 12250 TCF ENDTEST1
017194,000235: 24,2267 37754 CA BIT8 # ZERO ALL ERASEABLE USED IN TEST
017195,000236: 24,2270 55777 TS ZERONDX
017196,000237: 24,2271 33655 CA GENPLAD
017197,000238: 24,2272 03245 TC ZEROING
017198,000239: 24,2273 03353 TC NBPOSPL # ALIGN ANGLE COMPUTATION
017199,000240:
017200,000241: 24,2274 03104 TC POSGMBL # COARSE ALIGN THOSE GIMBALS NOW
017201,000242:
017202,000243: 24,2275 12252 TCF OPCHK
017203,000244: 24,2276 03133 TC FALNE # FINE ALIGN PLATFORM BY TORQUING GYROS
017204,000245:
017205,000246: 24,2277 05206 TC BANKCALL
017206,000247: 24,2300 26751 CADR IMUSTALL
017207,000248: 24,2301 12250 TCF ENDTEST1
017208,000249: 24,2302 37762 CA TWO
017209,000250: 24,2303 55672 CDUCHECK TS CDUNDX # THIS LOOP CHECKS FOR NO ERROR BETWEEN
017210,000251: 24,2304 51672 INDEX CDUNDX # DESIRED CDU ANGLES AND THE ACTUAL ANGLES
017211,000252: 24,2305 40400 CS THETAD
017212,000253: 24,2306 51672 INDEX CDUNDX
017213,000254: 24,2307 60032 AD CDUX
017214,000255: 24,2310 55551 TS STOREPL
017215,000256: 24,2311 11551 CCS STOREPL
017216,000257: 24,2312 02320 TC ERRMASK
017217,000258: 24,2313 02315 TC NOERR
017218,000259: 24,2314 02320 TC ERRMASK
017219,000260: 24,2315 11672 NOERR CCS CDUNDX
017220,000261: 24,2316 02303 TC CDUCHECK
017221,000262: 24,2317 02324 TC LOADIC
017222,000263: 24,2320 73660 ERRMASK MASK LOWFOUR # ALLOW FIVE BIT ERRORS
017223,000264: 24,2321 10000 CCS A
017224,000265: 24,2322 02444 TC ALARMS
017225,000266: 24,2323 02315 TC NOERR
017226,000267: 24,2324 37763 LOADIC CA ONE
017227,000268: 24,2325 55673 TS RESULTCT
017228,000269: 24,2326 47763 CS ONE
017229,000270:
|
|
Page 416 |
017231,000272: 24,2327 55670 TS MASKREG # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
017232,000273:
017233,000274: 24,2330 37767 CA ZERO
017234,000275: 24,2331 54037 TS PIPAX
017235,000276: 24,2332 54040 TS PIPAY
017236,000277: 24,2333 54041 TS PIPAZ
017237,000278:
017238,000279: 24,2334 37751 CA BIT11
017239,000280: 24,2335 55527 TS LENGTHOT # VECTOR IN PIPA COUNTERS
017240,000281: 24,2336 37763 CA ONE
017241,000282: 24,2337 03214 TC WAITLOOP
017242,000283: 24,2340 11676 CCS COUNTPL
017243,000284: 24,2341 03236 TC WAITLP2
017244,000285: 24,2342 33661 CA DEC56
017245,000286: 24,2343 03214 TC WAITLOOP
017246,000287: 24,2344 37762 OPCHK1 CA TWO
017247,000288: 24,2345 55541 OPCHK2 TS PIPINDEX
017248,000289: 24,2346 00004 INHINT
017249,000290: 24,2347 02776 TC CHECKG
017250,000291: 24,2350 00003 RELINT
017251,000292: 24,2351 37767 CA ZERO
017252,000293: 24,2352 51541 INDEX PIPINDEX
017253,000294: 24,2353 54037 TS PIPAX
017254,000295: 24,2354 03072 TC DATALD # LOAD PIPA DATA AND TIME IN DATAPL
017255,000296: 24,2355 57673 XCH RESULTCT
017256,000297: 24,2356 67761 AD FOUR
017257,000298: 24,2357 55673 TS RESULTCT
017258,000299: 24,2360 11541 CCS PIPINDEX
017259,000300: 24,2361 02345 TC OPCHK2
017260,000301: 24,2362 47761 READOUT CS FOUR
017261,000302: 24,2363 61673 AD RESULTCT
017262,000303: 24,2364 55673 TS RESULTCT
017263,000304: 24,2365 22007 ZL
017264,000305: 24,2366 51673 INDEX RESULTCT
017265,000306: 24,2367 31626 CA DATAPL
017266,000307: 24,2370 22000 LXCH A
017267,000308: 24,2371 51673 INDEX RESULTCT
017268,000309: 24,2372 21572 DAS GENPL +1
017269,000310: 24,2373 31673 CA RESULTCT
017270,000311: 24,2374 71670 MASK MASKREG
017271,000312: 24,2375 10000 CCS A
017272,000313: 24,2376 02362 TC READOUT
017273,000314: 24,2377 34570 CA TEN
017274,000315: 24,2400 66311 AD THREE
017275,000316: 24,2401 55673 TS RESULTCT
017276,000317: 24,2402 40000 CS A
017277,000318: 24,2403 55670 TS MASKREG
017278,000319: 24,2404 11676 CCS COUNTPL
017279,000320: 24,2405 03236 TC WAITLP2
017280,000321: 24,2406 03257 TC COMPUT
017281,000322:
|
|
Page 417 |
017283,000324: 24,2407 33646 RADCK CA V16N40S
017284,000325: 24,2410 04657 TC NVSBWAIT # OPERATOR WILL CHECK RADAR STATUS.IN LAB.
017285,000326: 24,2411 04622 TC FLASHON # SET RADAR OFF THEN PUT RESOLVER STANDARD
017286,000327: 24,2412 04475 TC ENDIDLE # ON TRUNNION AND SET TO +45 DEG.SHAFT WIL
017287,000328: 24,2413 02250 TC ENDTEST1
017288,000329: 24,2414 02415 TC +1 # AFTER SETTING RES STANDARD DO A V33
017289,000330: 24,2415 37767 CA ZERO
017290,000331: 24,2416 54423 TS TANG +1
017291,000332: 24,2417 33662 CA 45DEG
017292,000333: 24,2420 54422 TS TANG
017293,000334: 24,2421 05206 DRIVRAD TC BANKCALL # IN SC WHEN RAD PRESENT DO V33 RIGHT AWAY
017294,000335: 24,2422 20250 CADR RRZERO # LGC WILL ATTEMPT TO DRIVE 45 DEG TRUNN.
017295,000336: 24,2423 05206 TC BANKCALL # TO MATCH STANDARD, AFTER ZEROING CDUS
017296,000337: 24,2424 26745 CADR RADSTALL
017297,000338: 24,2425 02250 TC ENDTEST1
017298,000339: 24,2426 05206 TC BANKCALL
017299,000340: 24,2427 20364 CADR RRDESNB
017300,000341:
017301,000342: 24,2430 05206 TC BANKCALL
017302,000343: 24,2431 26745 CADR RADSTALL # IF CDU FAILS TO AGREE WITH COMMAND TO
017303,000344: 24,2432 02444 TC ALARMS # 1 DEG GET ALARM HERE
017304,000345:
017305,000346: 24,2433 04622 TC FLASHON # OPERATOR WILL CHECK STATUS OF RADAR
017306,000347: 24,2434 04475 TC ENDIDLE # IN S/C DO V33 TO CONTINUE WITH SHAFT
017307,000348: 24,2435 02250 TC ENDTEST1 # TEST
017308,000349: 24,2436 02437 TC +1 # IN LAB TURN RADAR OFF CHANGE RES STANDAR
017309,000350: 24,2437 37767 CA ZERO # TO SHAFT AND SET FOR -45DEG.
017310,000351: 24,2440 54422 TS TANG # THEN DO A V33 IF WANT TO REPEAT CHECK
017311,000352: 24,2441 43662 CS 45DEG # DO A V34 TO TERMINATE
017312,000353: 24,2442 54423 TS TANG +1
017313,000354: 24,2443 02421 TC DRIVRAD
017314,000355: 24,2444 56002 ALARMS XCH Q
017315,000356: 24,2445 55546 TS QPLACE
017316,000357: 24,2446 04755 TC ALARM
017317,000358: 24,2447 01411 OCT 1411
017318,000359: 24,2450 01546 TC QPLACE
017319,000360:
|
|
Page 418 |
017321,000362: 24,2451 06112 GYRSFTST TC INTPRET # START ADRESS FOR IRIG SF TEST
017322,000363: 24,2452 77624 CALL
017323,000364: 24,2453 30553 LATAZCHK # LOAD AZ AND LAT
017324,000365: 24,2454 77776 EXIT
017325,000366: 24,2455 33635 TESTCALL CAF V21N30E
017326,000367: 24,2456 04657 TC NVSBWAIT # LOAD + OR - 1 FOR + OR - X TEST (+00001)
017327,000368: 24,2457 04475 TC ENDIDLE # LOAD + OR - 2 FOR + OR - Y TEST
017328,000369: 24,2460 12250 TCF ENDTEST1 # LOAD + OR - 3 FOR + OR - Z TEST
017329,000370: 24,2461 02455 TC TESTCALL
017330,000371: 24,2462 56337 XCH DSPTEM1
017331,000372: 24,2463 55614 TS CALCDIR
017332,000373: 24,2464 00006 EXTEND # THIS ROUTINE LOOKS AT THE SIZE OF THE
017333,000374: 24,2465 62472 BZMF NEGSIZ # ENTRY MADE BY THE OPERATOR, IF HE DID NO
017334,000375: 24,2466 75340 SIZLOOK MASK NEG3 # T ENTER TEST NO THAT IS W/I PERMISSIBLE
017335,000376: 24,2467 00006 EXTEND # RANGE- HE WILL BE ASKED TO LOAD AGAIN.
017336,000377: 24,2470 12474 BZF GUDENTRY # THIS IS CONSIDERED NECESSARY BECAUSE
017337,000378: 24,2471 02455 TC TESTCALL # OF FOLLOWING INDEXED TC WHICH COULD
017338,000379:
017339,000380: 24,2472 40000 NEGSIZ COM # SEND THE COMPUTER OFF INTO THE BOONDOCKS
017340,000381: 24,2473 02466 TC SIZLOOK # TO PLAY WITH ITSELF IF THE OPERATOR
017341,000382: 24,2474 31614 GUDENTRY CA CALCDIR # MAKES ABAD ENTRY******
017342,000383: 24,2475 67761 AD FOUR
017343,000384: 24,2476 50000 INDEX A
017344,000385: 24,2477 02500 TC +1
017345,000386: 24,2500 02455 TC TESTCALL
017346,000387: 24,2501 02507 TC +6 # C(A)=+00001 FOR -Z
017347,000388: 24,2502 02506 TC +4 # C(A)=+00002 FOR -Y
017348,000389: 24,2503 02505 TC +2 # C(A)=+00003 FOR -X
017349,000390: 24,2504 02500 TC -4 # C(A)=+00004 ERROR
017350,000391: 24,2505 02510 TC +3 # C(A)=+00005 FOR +X
017351,000392: 24,2506 02514 TC +6
017352,000393: 24,2507 02517 TC +10
017353,000394: 24,2510 37761 CAF FOUR
017354,000395: 24,2511 55544 TS POSITON # 4 IS FOR A.L. POSN 4 USED FOR X SF TEST
017355,000396: 24,2512 02521 TC +7
017356,000397: 24,2513 02521 TC +6
017357,000398: 24,2514 37762 CAF TWO
017358,000399: 24,2515 55544 TS POSITON # +2 IS A.L. POS 2 USED FOR Y SF TEST
017359,000400: 24,2516 02521 TC +3
017360,000401: 24,2517 37763 CAF ONE
017361,000402: 24,2520 55544 TS POSITON # +1 IS A.L. POS 1 USED FOR Z SF TEST
017362,000403: 24,2521 55617 TS OPTNREG # C(K) = (4,2,1) FOR X,Y,Z
017363,000404: 24,2522 55621 TS SAVE +1
017364,000405: 24,2523 04724 TC FREEDSP
017365,000406: 24,2524 37767 CAF ZERO
017366,000407: 24,2525 55536 TS NBPOS # SET UP NB COORD TO Z NORTH, X UP
017367,000408: 24,2526 55622 TS SAVE +2 # INITIALIZE FOR EARTHR DESIGNATE USAGE
017368,000409: 24,2527 55563 TS TESTNO # INITIALIZE FOR TEST ABORT ROUTINE
017369,000410: 24,2530 55615 TS CDUFLAG # ZEROS FOR STRTWACH USE
017370,000411: 24,2531 33637 CAF SFCONST
017371,000412:
|
|
Page 419 |
017373,000414: 24,2532 55623 TS SFCONST1 # FOR DIVISION DURING CALCSFE
017374,000415:
017375,000416: 24,2533 05206 TC BANKCALL
017376,000417: 24,2534 26000 CADR IMUZERO
017377,000418: 24,2535 05206 TC BANKCALL
017378,000419: 24,2536 26751 CADR IMUSTALL
017379,000420: 24,2537 12250 TCF ENDTEST1
017380,000421: 24,2540 03353 TC NBPOSPL
017381,000422: 24,2541 03104 TC POSGMBL
017382,000423: 24,2542 12250 TCF ENDTEST1
017383,000424: 24,2543 03133 TC FALNE
017384,000425: 24,2544 05206 TC BANKCALL
017385,000426: 24,2545 31726 CADR REDYTORK
017386,000427: 24,2546 55552 WAITFIVE TS SOUTHDR
017387,000428: 24,2547 37756 CAF BIT6 # THIS SECTION CALLS FOR 2-32 MSEC WAITS
017388,000429: 24,2550 02563 TC DIRECTN -5
017389,000430: 24,2551 37756 ENABLE CAF BIT6
017390,000431: 24,2552 00006 EXTEND # ENABLE GYRO TORQUING LOOP BY TURNING
017391,000432: 24,2553 05014 WOR 14C # ON CAL MODULE RELAY
017392,000433:
017393,000434: 24,2554 00004 INHINT
017394,000435: 24,2555 47762 CS TWO # SETS UP EXEC SWITCH SO IMUPULSE WILL
017395,000436: 24,2556 70366 MASK IMODES33 # NOT TURN OFF GYRO TORQ ENABLE RELAY
017396,000437: 24,2557 67762 AD TWO
017397,000438: 24,2560 54366 TS IMODES33
017398,000439: 24,2561 37762 CAF TWO
017399,000440: 24,2562 55552 TS SOUTHDR
017400,000441: 24,2563 55527 TS LENGTHOT # 20 MSEC DELAY FOR GYRO LOOP STABILIZAT.
017401,000442: 24,2564 37763 CA ONE
017402,000443: 24,2565 03214 TC WAITLOOP
017403,000444: 24,2566 11676 CCS COUNTPL
017404,000445: 24,2567 03236 TC WAITLP2
017405,000446: 24,2570 05206 DIRECTN TC BANKCALL # TORQUING ROUTINE IN IMU PERFORMANCE
017406,000447: 24,2571 46520 CADR SILVER # BANK 3
017407,000448: 24,2572 11552 CCS SOUTHDR # A ONE FIRST TIME THROUGH, THEN ZERO
017408,000449: 24,2573 02546 TC WAITFIVE
017409,000450:
017410,000451: 24,2574 11615 STRTWACH CCS CDUFLAG # RETURNS HERE VIA QPLACE FROM SILVER
017411,000452: 24,2575 02656 TC CDUZOTST # BEEN CAUGHT AND CDU THROUGH ZERO IS
017412,000453: 24,2576 11621 CCS SAVE +1
017413,000454: 24,2577 02616 TC LOOKCDUP -4
017414,000455: 24,2600 02622 TC LOOKCDUP
017415,000456: 24,2601 37767 CORRECT CAF ZERO
017416,000457: 24,2602 54356 TS LGYRO # RELEASES GYROS FOR IMUPULSE USAGE
017417,000458: 24,2603 05206 TC BANKCALL # EARTHRATE CORRECTION TO GYROS NOT EAST
017418,000459: 24,2604 30424 CADR EARTHR # OR WEST
017419,000460: 24,2605 37763 CAF ONE
017420,000461: 24,2606 54356 TS LGYRO # RESERVES GYROS FOR S.F. TEST TORQUING
017421,000462: 24,2607 55622 TS SAVE +2 # INITIALIZES TO INSURE 5.6 DEG OF TORQ)
017422,000463: 24,2610 27563 ADS TESTNO # INCR THE BURST COUNTER, WHICH IS USED TO
017423,000464:
|
|
Page 420 |
017425,000466: 24,2611 41563 CS TESTNO # COUNT THE NO. OF ITMES THE GYRO COUNTER
017426,000467: 24,2612 77766 MASK FIVE # IS LOADED, IF A TENTH LOAD IS REQUESTED
017427,000468: 24,2613 00006 EXTEND # THE SFE IS TOO LARGE TO BE MEANINGFULL
017428,000469: 24,2614 12765 BZF STOPTEST # OR THE CDU,S ARE NOT WORKING.
017429,000470: 24,2615 02570 TC DIRECTN
017430,000471:
017431,000472: 24,2616 37767 CAF ZERO # ZEROS CDU REG WHICH WILL BE USED TO
017432,000473: 24,2617 55621 TS SAVE +1
017433,000474: 24,2620 51672 INDEX CDUNDX # MEASURE ANGLE.
017434,000475: 24,2621 54032 TS CDUX
017435,000476: 24,2622 00004 LOOKCDUP INHINT
017436,000477: 24,2623 37757 CAF BIT5
017437,000478: 24,2624 55624 STILLOOK TS TIMER
017438,000479: 24,2625 51672 INDEX CDUNDX # LOOKS FOR FIRST CDU PULSE AFTER TORQUING
017439,000480: 24,2626 10032 CCS CDUX # STARTS
017440,000481: 24,2627 02641 TC OUTPLUS # HERE IS PLUS PULSE
017441,000482: 24,2630 02633 TC TIMEWACH
017442,000483: 24,2631 02444 TC ALARMS # TTELL OPERATOR FIRST CDU PULSE WAS MISSD
017443,000484: 24,2632 02652 TC OUTNEG # HERE IS MINUS PULSE
017444,000485: 24,2633 11624 TIMEWACH CCS TIMER # WATCHES TIME IN INHINT SO COPS WILL NOT
017445,000486: 24,2634 02624 TC STILLOOK # CATCH US
017446,000487: 24,2635 00003 RELINT
017447,000488:
017448,000489: 24,2636 10067 CCS NEWJOB
017449,000490: 24,2637 05532 TC CHANG1
017450,000491: 24,2640 02622 TC LOOKCDUP # KEEP WATCHING IF THE PULSE IS NOT HERE
017451,000492:
017452,000493: 24,2641 43636 OUTPLUS CS DESANGLE # -2047 CDU PULSES ADDED TO CDU REG SO
017453,000494: 24,2642 51672 INDEX CDUNDX # ZERO CROSSOVER CAN BE DETECTED
017454,000495: 24,2643 54032 TS CDUX
017455,000496: 24,2644 37763 LOADFLAG CAF ONE
017456,000497: 24,2645 55615 TS CDUFLAG
017457,000498: 24,2646 30047 CA GYROCTR # GYRO TORQ CMDS LEFT OUT OF FIRST 5.625
017458,000499: 24,2647 55620 TS SAVE # DEG COMMANDED WHEN CDU PULSE ARRIVED
017459,000500: 24,2650 00003 RELINT
017460,000501: 24,2651 02656 TC CDUZOTST
017461,000502:
017462,000503: 24,2652 33636 OUTNEG CA DESANGLE
017463,000504: 24,2653 51672 INDEX CDUNDX
017464,000505: 24,2654 54032 TS CDUX
017465,000506: 24,2655 02644 TC LOADFLAG
017466,000507:
017467,000508: 24,2656 51672 CDUZOTST INDEX CDUNDX
017468,000509: 24,2657 10032 CCS CDUX
017469,000510: 24,2660 02664 TC +4
017470,000511: 24,2661 02701 TC ENDWATCH
017471,000512: 24,2662 02664 TC +2
017472,000513: 24,2663 02701 TC ENDWATCH
017473,000514: 24,2664 37752 CAF BIT10 # RAND WITH BIT 10 TO SEE IF STILL TORQ.
017474,000515: 24,2665 00006 EXTEND
017475,000516:
|
|
Page 421 |
017477,000518: 24,2666 02014 RAND 14C
017478,000519: 24,2667 10000 CCS A
017479,000520: 24,2670 02676 TC +6
017480,000521:
017481,000522: 24,2671 11622 CCS SAVE +2 # SEE IF 2.8DEG OR 5.6 DEG SINCE LAST
017482,000523: 24,2672 02674 TC +2 # EEARTHR USE, IF 2.8 DEG, DO 2.8 MORE
017483,000524: 24,2673 02601 TC CORRECT # THEN GO TO CORRECT
017484,000525: 24,2674 55622 TS SAVE +2
017485,000526: 24,2675 02570 TC DIRECTN
017486,000527: 24,2676 10067 CCS NEWJOB
017487,000528: 24,2677 05532 TC CHANG1
017488,000529: 24,2700 02656 TC CDUZOTST
017489,000530:
017490,000531: 24,2701 00004 ENDWATCH INHINT # WWILL STOR GYROCTR AT END OF 2048 CDU
017491,000532: 24,2702 37767 CAF ZERO # PULSES AND STOP TORQ BY ZEROING REQUESTS
017492,000533: 24,2703 54356 TS LGYRO # RELEASE GYROS FOR OTHERS USAGE
017493,000534: 24,2704 67770 AD NEG0 # PREVENT +0 IN OUTPUT COUNTER
017494,000535: 24,2705 56047 XCH GYROCTR
017495,000536: 24,2706 55621 TS SAVE +1 # AND STOPS TORQUING BY ZEROING TORQ
017496,000537: 24,2707 47762 CS TWO
017497,000538: 24,2710 70366 MASK IMODES33 # THIS TURNS OFF EXEC SWITCH SO THE GYRO
017498,000539: 24,2711 54366 TS IMODES33 # TORQ. ENABLE RELAY CAN BE TURNED OFF.
017499,000540: 24,2712 00003 RELINT
017500,000541: 24,2713 31620 CALCSFE CA SAVE # GYROCTR AT TEST START
017501,000542: 24,2714 00006 EXTEND
017502,000543: 24,2715 61621 SU SAVE +1 # GYROCTR AT TEST END
017503,000544: 24,2716 55622 TS SAVE +2
017504,000545: 24,2717 00006 EXTEND
017505,000546: 24,2720 62737 BZMF ARITH # SEE IF IT IS NEG OR ZERO,IF NEG,SFE IS +
017506,000547: 24,2721 73640 MASK SIZCHK
017507,000548: 24,2722 00006 EXTEND # THIS ROUTINE TESTS SAVE-(SAVE+1) TO SEE
017508,000549: 24,2723 12731 BZF NEGSFE # IF THE RESULT IS WITHIN PERMISSIBLE SIZE
017509,000550: 24,2724 41622 CS SAVE +2 # AND DETERMINES POLARITY OF SFE USING THE
017510,000551: 24,2725 73640 MASK SIZCHK # PRESENCE OR ABSENCE OF BITS 12,13,14.
017511,000552: 24,2726 00006 EXTEND # IF BITS ARE PRESENT IN POSITIVE SAVE +2
017512,000553: 24,2727 12733 BZF POSSFE # THEN THE SFE MUST BE POS. IF DIFFERENCE
017513,000554: 24,2730 02765 TC STOPTEST # IS GREATER THAN 2047 PULSES FROM THE
017514,000555: 24,2731 31622 NEGSFE CAE SAVE +2 # IDEAL NO OF PULSES, THE SFE EXCEEDS
017515,000556: 24,2732 02737 TC ARITH # 15600 PPM, THE TEST IS NOT VALID AND
017516,000557:
017517,000558: # THEREFORE ABORTS AND TURNS ON PROGRAM ALARM
017518,000559: 24,2733 37743 POSSFE CAF POSMAX # POS SFE DEFINITION = IRIG SF IN SEC OF
017519,000560: 24,2734 00006 EXTEND # ARC PER PULSE IS GREATER THAN
017520,000561: 24,2735 61622 SU SAVE +2 # .61798095703125 SEC OF ARC/ PULSE
017521,000562: 24,2736 02740 TC ARITH +1
017522,000563:
017523,000564: 24,2737 40000 ARITH COM
017524,000565: 24,2740 22007 ZL
017525,000566: 24,2741 00006 EXTEND
017526,000567: 24,2742 11623 DV SFCONST1
|
|
Page 422 |
017528,000569: 24,2743 54342 LOADIT TS DSPTEM2
017529,000570: 24,2744 02745 TC DATADSP
017530,000571:
017531,000572: 24,2745 04632 DATADSP TC GRABDSP
017532,000573: 24,2746 04637 TC PREGBSY
017533,000574: 24,2747 31614 CA CALCDIR
017534,000575: 24,2750 54344 TS DSPTEM2 +2 # DISPLAYS TEST NO JUST PERFORMED
017535,000576: 24,2751 33643 CAF VB06N66 # R3 = TEST NO JUST PERFORMED
017536,000577: 24,2752 04657 TC NVSBWAIT
017537,000578: 24,2753 04622 TC FLASHON
017538,000579: 24,2754 04475 TC ENDIDLE # TO END TEST DO V34E
017539,000580: 24,2755 02757 TC +2
017540,000581: 24,2756 02455 TC TESTCALL # TO CONTINUE TEST DO V33E
017541,000582: 24,2757 05206 TC BANKCALL
017542,000583: 24,2760 26000 CADR IMUZERO
017543,000584: 24,2761 05206 TC BANKCALL
017544,000585: 24,2762 26751 CADR IMUSTALL
017545,000586: 24,2763 12250 TCF ENDTEST1
017546,000587: 24,2764 12250 TCF ENDTEST1
017547,000588:
017548,000589: 24,2765 05206 STOPTEST TC BANKCALL
017549,000590: 24,2766 26000 CADR IMUZERO
017550,000591: 24,2767 05206 TC BANKCALL # CORRECT CDUCTRS AND TURN ON PROG ALARM
017551,000592: 24,2770 26751 CADR IMUSTALL # TO TELL OPERATOR LAST CDU PULSE WAS
017552,000593: 24,2771 12250 TCF ENDTEST1 # MISSED OR GYRO TORQ LOOP WAY OUT OF
017553,000594: 24,2772 37767 CAF ZERO # ALLOWABLE LIMITS.........
017554,000595: 24,2773 54356 TS LGYRO # **** RELEASE GYROS FOR OTHERS USAGE*****
017555,000596: 24,2774 02444 TC ALARMS
017556,000597: 24,2775 12250 TCF ENDTEST1
017557,000598:
|
|
Page 423 |
017559,000600: 24,2776 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
017560,000601: 24,2777 23546 QXCH QPLACE # RECORDS TIME AT OCCURRENCE OF A DELTA V
017561,000602: 24,3000 00003 CHECKG1 RELINT # KEEPS CONTENT OF PIPA REG INTACT
017562,000603: 24,3001 10067 CCS NEWJOB
017563,000604: 24,3002 05532 TC CHANG1
017564,000605: 24,3003 00004 INHINT
017565,000606: 24,3004 37767 CAF ZERO
017566,000607: 24,3005 51541 INDEX PIPINDEX
017567,000608: 24,3006 56037 XCH PIPAX
017568,000609: 24,3007 55551 TS STOREPL
017569,000610: 24,3010 11551 CCS STOREPL
017570,000611: 24,3011 03015 TC CHECKP
017571,000612: 24,3012 03070 TC RESTOREA
017572,000613: 24,3013 03030 TC CHECKM
017573,000614: 24,3014 03070 TC RESTOREA
017574,000615: 24,3015 37756 CHECKP CAF BIT6 # LOOKS FOR ONE MORE PLUS PULSE
017575,000616: 24,3016 55540 TS PIPANO
017576,000617: 24,3017 51541 INDEX PIPINDEX
017577,000618: 24,3020 10037 CCS PIPAX
017578,000619: 24,3021 03043 TC CHECKG3
017579,000620: 24,3022 03025 TC +3
017580,000621: 24,3023 03070 TC RESTOREA
017581,000622: 24,3024 03025 TC +1
017582,000623: 24,3025 11540 CCS PIPANO
017583,000624: 24,3026 03016 TC CHECKP +1
017584,000625: 24,3027 03070 TC RESTOREA
017585,000626: 24,3030 37756 CHECKM CAF BIT6 # LOOKS FOR ONE MORE MINUS PULSE
017586,000627: 24,3031 55540 TS PIPANO
017587,000628: 24,3032 51541 INDEX PIPINDEX
017588,000629: 24,3033 10037 CCS PIPAX
017589,000630: 24,3034 03070 TC RESTOREA
017590,000631: 24,3035 03040 TC +3
017591,000632: 24,3036 03043 TC CHECKG3
017592,000633: 24,3037 03040 TC +1
017593,000634: 24,3040 11540 CCS PIPANO
017594,000635: 24,3041 03031 TC CHECKM +1
017595,000636: 24,3042 03070 TC RESTOREA
017596,000637: 24,3043 05026 CHECKG3 TC FINETIME # TIME IN DOUBLE PRECISION LEFT IN MPAC
017597,000638:
017598,000639: 24,3044 52145 DXCH MPAC
017599,000640: 24,3045 37760 CAF BIT4
017600,000641: 24,3046 55540 CHECKG5 TS PIPANO
017601,000642: 24,3047 51541 INDEX PIPINDEX
017602,000643: 24,3050 10037 CCS PIPAX
017603,000644: 24,3051 03055 TC +4
017604,000645: 24,3052 03070 TC RESTOREA
017605,000646: 24,3053 03055 TC +2
017606,000647: 24,3054 03070 TC RESTOREA
017607,000648: 24,3055 11540 CCS PIPANO
017608,000649: 24,3056 03046 TC CHECKG5
017609,000650:
|
|
Page 424 |
017611,000652: 24,3057 03062 NREAD TC RESTORE
017612,000653: 24,3060 55551 TS STOREPL
017613,000654: 24,3061 01546 TC QPLACE
017614,000655: 24,3062 57551 RESTORE XCH STOREPL # A WILL CONTAIN PREVIOUS PIPA CNTR CONTEN
017615,000656: 24,3063 51541 INDEX PIPINDEX # STOREPL WILL CONTAIN ZERO
017616,000657: 24,3064 60037 AD PIPAX
017617,000658: 24,3065 51541 INDEX PIPINDEX
017618,000659: 24,3066 54037 TS PIPAX
017619,000660: 24,3067 00002 TC Q
017620,000661:
|
|
Page 425 |
017622,000663: 24,3070 03062 RESTOREA TC RESTORE
017623,000664: 24,3071 03000 TC CHECKG1
017624,000665: 24,3072 31551 DATALD CA STOREPL
017625,000666: 24,3073 51673 INDEX RESULTCT
017626,000667: 24,3074 55626 TS DATAPL
017627,000668: 24,3075 30144 CA MPAC
017628,000669: 24,3076 51673 INDEX RESULTCT
017629,000670: 24,3077 55627 TS DATAPL +1
017630,000671: 24,3100 30145 CA MPAC +1
017631,000672: 24,3101 51673 INDEX RESULTCT
017632,000673: 24,3102 55630 TS DATAPL +2
017633,000674: 24,3103 00002 TC Q
017634,000675:
017635,000676:
017636,000677:
017637,000678: 24,3104 00006 POSGMBL EXTEND # COARSE ALIGNING SUBROUTINE
017638,000679: 24,3105 23546 QXCH QPLACE
017639,000680:
017640,000681: 24,3106 06112 TC INTPRET
017641,000682: 24,3107 77624 CALL
017642,000683: 24,3110 32655 CALCGA
017643,000684: 24,3111 77776 EXIT
017644,000685:
017645,000686: 24,3112 05206 TC BANKCALL
017646,000687: 24,3113 26065 CADR IMUCOARS
017647,000688: 24,3114 30075 CA FLAGWRD1
017648,000689: 24,3115 77754 MASK BIT8
017649,000690: 24,3116 10000 CCS A # L +1, OTHERWISE TO L +2.
017650,000691: 24,3117 03122 TC LOCK
017651,000692: 24,3120 25546 INCR QPLACE
017652,000693: 24,3121 03124 TC +3
017653,000694: 24,3122 37762 LOCK CA TWO
017654,000695: 24,3123 55537 TS NDXCTR
017655,000696: 24,3124 06067 TC FLAG1DWN
017656,000697: 24,3125 00200 OCT 200
017657,000698: 24,3126 05206 TC BANKCALL
017658,000699: 24,3127 26751 CADR IMUSTALL
017659,000700: 24,3130 12250 TCF ENDTEST1
017660,000701: 24,3131 01546 TC QPLACE
017661,000702: 24,3132 00401 GMLOCKCK OCT 00401
017662,000703:
|
|
Page 426 |
017664,000705: 24,3133 00006 FALNE EXTEND # TORQUES GYROS TO NULL OVT DIFFERENCE
017665,000706: 24,3134 23546 QXCH QPLACE # BETWEEN DESIRED SM ORIENTATION WITH RESP
017666,000707: 24,3135 05206 TC BANKCALL # TO NBASE AND ACTUAL
017667,000708: 24,3136 26000 CADR IMUZERO
017668,000709: 24,3137 05206 TC BANKCALL
017669,000710: 24,3140 26751 CADR IMUSTALL
017670,000711: 24,3141 12250 TCF ENDTEST1
017671,000712: 24,3142 05206 TC BANKCALL
017672,000713: 24,3143 26252 CADR IMUFINE
017673,000714: 24,3144 05206 TC BANKCALL
017674,000715: 24,3145 26751 CADR IMUSTALL
017675,000716: 24,3146 12250 TCF ENDTEST1
017676,000717: 24,3147 30032 FALNE1 CA CDUX
017677,000718: 24,3150 50110 INDEX FIXLOC
017678,000719: 24,3151 54024 TS 24
017679,000720: 24,3152 30033 CA CDUY
017680,000721: 24,3153 50110 INDEX FIXLOC
017681,000722: 24,3154 54020 TS 20
017682,000723: 24,3155 30034 CA CDUZ
017683,000724: 24,3156 50110 INDEX FIXLOC
017684,000725: 24,3157 54022 TS 22
017685,000726: 24,3160 37757 CA BIT5
017686,000727: 24,3161 60110 AD FIXLOC
017687,000728: 24,3162 50110 INDEX FIXLOC
017688,000729: 24,3163 54050 TS S1
017689,000730: 24,3164 06112 TC INTPRET
017690,000731: 24,3165 64375 VLOAD MXV
017691,000732: 24,3166 02401 XSM
017692,000733: 24,3167 02445 STARAD
017693,000734: 24,3170 77772 VSL1
017694,000735: 24,3171 34041 STCALL 32D
017695,000736: 24,3172 32555 NBSM
017696,000737: 24,3173 26423 STOVL XDC
017697,000738: 24,3174 02407 YSM
017698,000739: 24,3175 76521 MXV VSL1
017699,000740: 24,3176 02445 STARAD
017700,000741: 24,3177 34041 STCALL 32D
017701,000742: 24,3200 32555 NBSM
017702,000743: 24,3201 26431 STOVL YDC
017703,000744: 24,3202 02423 XDC
017704,000745: 24,3203 76435 VXV VSL1
017705,000746: 24,3204 02431 YDC
017706,000747: 24,3205 36437 STCALL ZDC
017707,000748: 24,3206 32425 CALCGTA
017708,000749: 24,3207 77776 EXIT
017709,000750: 24,3210 33657 CA OGCPL
017710,000751: 24,3211 05206 TC BANKCALL
017711,000752: 24,3212 26362 CADR IMUPULSE
017712,000753: 24,3213 01546 TC QPLACE
017713,000754:
|
|
Page 427 |
017715,000756: 24,3214 00006 WAITLOOP EXTEND # LOOPS IN X SEC INCREMENTS FOR NUMBER OF
017716,000757: 24,3215 23545 QXCH QPLAC
017717,000758: 24,3216 55676 TS COUNTPL # NUMBER PUT INTO LENGTHOT
017718,000759: 24,3217 11676 WAITLP1 CCS COUNTPL
017719,000760: 24,3220 03224 TC +4
017720,000761: 24,3221 01545 TC QPLAC
017721,000762: 24,3222 03224 TC +2
017722,000763: 24,3223 03216 TC WAITLP1 -1
017723,000764: 24,3224 00004 INHINT
017724,000765: 24,3225 31527 CAE LENGTHOT
017725,000766: 24,3226 05663 TC WAITLIST
017726,000767: 24,3227 E5,1400 EBANK= XSM
017727,000768: 24,3227 03242 50065 2CADR WAITLP3
017728,000769:
017729,000770: 24,3231 00003 RELINT
017730,000771: 24,3232 11676 CCS COUNTPL
017731,000772: 24,3233 01545 TC QPLAC
017732,000773: 24,3234 01545 TC QPLAC
017733,000774: 24,3235 13236 NOOP
017734,000775: 24,3236 55676 WAITLP2 TS COUNTPL # ENTER HERE AFTER DOING CALLING JOB
017735,000776: 24,3237 33241 CAF WTLPCADR
017736,000777: 24,3240 05545 TC JOBSLEEP
017737,000778: 24,3241 51217 WTLPCADR CADR WAITLP1
017738,000779: 24,3242 33241 WAITLP3 CAF WTLPCADR
017739,000780: 24,3243 05551 TC JOBWAKE
017740,000781: 24,3244 05727 TC TASKOVER
017741,000782:
017742,000783:
017743,000784:
017744,000785: 24,3245 54001 ZEROING TS L
017745,000786: 24,3246 13250 TCF +2
017746,000787: 24,3247 55777 ZEROING1 TS ZERONDX
017747,000788: 24,3250 37767 CAF ZERO
017748,000789: 24,3251 50001 INDEX L
017749,000790: 24,3252 54000 TS 0
017750,000791: 24,3253 24001 INCR L
017751,000792: 24,3254 11777 CCS ZERONDX
017752,000793: 24,3255 13247 TCF ZEROING1
017753,000794: 24,3256 00002 TC Q
017754,000795: 24,3257 06112 COMPUT TC INTPRET # CALCULATE LENGTH OF GRAVITY VECTOR AS
017755,000796: 24,3260 77170 AXT,1 AXT,2 # MEASURED BY ACCELEROMETERS
017756,000797: 24,3261 00026 22D
017757,000798: 24,3262 00012 10D
017758,000799: 24,3263 77731 SSP
017759,000800: 24,3264 00051 S1
017760,000801: 24,3265 00004 4
017761,000802: 24,3266 77731 SSP
017762,000803: 24,3267 00052 S2
|
|
Page 428 |
017764,000805: 24,3270 00004 4
017765,000806: 24,3271 44743 LOPDELOP DLOAD* DSU*
017766,000807: 24,3272 75120 DATAPL +24D,2
017767,000808: 24,3273 02657 DATAPL +24D,1
017768,000809: 24,3274 41323 PDDL* DMP
017769,000810: 24,3275 75156 GENPL +24D,2
017770,000811: 24,3276 11651 DEC585
017771,000812: 24,3277 77671 DDV
017772,000813: 24,3300 55504 TIX,2 VDEF
017773,000814: 24,3301 51306 NEXT
017774,000815: 24,3302 47046 ABVAL RTB
017775,000816: 24,3303 33520 SGNAGREE
017776,000817: 24,3304 34343 STCALL DSPTEM2
017777,000818: 24,3305 51310 KODU
017778,000819: 24,3306 60006 NEXT PUSH TIX,1
017779,000820: 24,3307 51271 LOPDELOP
017780,000821: 24,3310 77776 KODU EXIT
017781,000822: 24,3311 04644 TC GRABWAIT
017782,000823: 24,3312 03605 TC SHOW
017783,000824: 24,3313 06112 TC INTPRET
017784,000825: 24,3314 41535 SLOAD PUSH
017785,000826: 24,3315 02630 DATAPL +1
017786,000827: 24,3316 41535 SLOAD PUSH
017787,000828: 24,3317 02634 DATAPL +5
017788,000829: 24,3320 55535 SLOAD VDEF
017789,000830: 24,3321 02640 DATAPL +11
017790,000831: 24,3322 76456 UNIT VSL1
017791,000832: 24,3323 77606 PUSH
017792,000833: 24,3324 41535 SLOAD PUSH
017793,000834: 24,3325 02644 DATAPL +15
017794,000835: 24,3326 41535 SLOAD PUSH
017795,000836: 24,3327 02650 DATAPL +21
017796,000837: 24,3330 55535 SLOAD VDEF
017797,000838: 24,3331 02654 DATAPL +25
017798,000839: 24,3332 76456 UNIT VSL1
017799,000840: 24,3333 45325 PDDL DSU
017800,000841: 24,3334 02655 DATAPL +26
017801,000842: 24,3335 02641 DATAPL +12
017802,000843: 24,3336 77612 SL4
017803,000844: 24,3337 77652 SL3
017804,000845: 24,3340 26530 STOVL LENGTHOT
017805,000846: 24,3341 51435 VXV ABVAL
017806,000847: 24,3342 56205 DMP DDV
017807,000848: 24,3343 11654 ERUNITS
017808,000849: 24,3344 02530 LENGTHOT
017809,000850: 24,3345 77634 RTB
017810,000851: 24,3346 33520 SGNAGREE
017811,000852: 24,3347 00343 STORE DSPTEM2
017812,000853: 24,3350 77776 EXIT
017813,000854: 24,3351 03605 TC SHOW
|
|
Page 429 |
017815,000856: 24,3352 12407 TCF RADCK
017816,000857: 24,3353 00006 NBPOSPL EXTEND # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
017817,000858: 24,3354 23546 QXCH QPLACE # AXISGEN,RESULTS TO BE USED IN CALCGA TO
017818,000859: 24,3355 06112 TC INTPRET
017819,000860: 24,3356 54160 AXC,1 XSU,1 # AZIMUTH IN NB COORDS
017820,000861: 24,3357 51670 SCNBAZ
017821,000862: 24,3360 02536 NBPOS
017822,000863: 24,3361 77773 VLOAD*
017823,000864: 24,3362 00001 0,1
017824,000865: 24,3363 02445 STORE STARAD
017825,000866:
017826,000867: 24,3364 54160 AXC,1 XSU,1 # VERTICAL IN NB COORDS
017827,000868: 24,3365 51702 SCNBVER
017828,000869: 24,3366 02536 NBPOS
017829,000870: 24,3367 77773 VLOAD*
017830,000871: 24,3370 00001 0,1
017831,000872: 24,3371 16453 STODL STARAD +6
017832,000873: 24,3372 33300 SCHZEROS
017833,000874: 24,3373 14007 STODL 6D
017834,000875: 24,3374 02507 AZIMUTH
017835,000876: 24,3375 57546 COS DCOMP
017836,000877: 24,3376 14011 STODL 8D
017837,000878: 24,3377 02507 AZIMUTH
017838,000879: 24,3400 77756 SIN
017839,000880: 24,3401 00013 STORE 10D # VERTICAL IN CER
017840,000881: 24,3402 77775 VLOAD
017841,000882: 24,3403 11703 SCNBVER
017842,000883: 24,3404 34015 STCALL 12D
017843,000884: 24,3405 32741 AXISGEN
017844,000885: 24,3406 77776 EXIT
017845,000886:
017846,000887: 24,3407 33647 SELPOSN CA DEC17
017847,000888: 24,3410 55777 TS ZERONDX
017848,000889: 24,3411 33667 CA XSMADR
017849,000890: 24,3412 03245 TC ZEROING
017850,000891:
017851,000892: 24,3413 51544 INDEX POSITON
017852,000893: 24,3414 03415 TC +1
017853,000894: 24,3415 03533 TC OPCHKPOS # OPCHK WILL PUT ZERO IN POSITON
017854,000895: 24,3416 03431 TC POSN1
017855,000896: 24,3417 03440 TC POSN2
017856,000897: 24,3420 03445 TC POSN3
017857,000898: 24,3421 03457 TC POSN4
017858,000899: 24,3422 03467 TC POSN5
017859,000900: 24,3423 03477 TC POSN6
017860,000901: 24,3424 03507 TC POSN7
017861,000902: 24,3425 03522 TC POSN8
017862,000903: 24,3426 03551 TC POSN9
017863,000904: 24,3427 03562 TC POSN10
017864,000905: 24,3430 03573 TC POSN11 # COMPASS POSITION
017865,000906:
|
|
Page 430 |
017867,000908: # (XXX.XX MERU) AND A VERTICAL TEST BY DV (XXX.XX MERU) EACH POSITION TELL
017868,000909: # HOW THE DISPLAYS ARE RELATED TO TTHE DRIFT COEFFICIENTS BEING MEASURED.
017869,000910: # NOTE THAT IT IS ILLEGAL TO RUN VERTICAL IN POS 6,4, OR 2 WITHOUT FIRST
017870,000911: # RUNNING HORIZONTAL OF POS 5,3, OR1. THIS IS BECAUSE THE HORIZ DRIFT CALC
017871,000912: # IN 1,3, OR 5 IS USED AS EAST DRIFFFT FOR VERTICAL TEST. THIS IS DONE BY
017872,000913: # THE MACHINE AUTOMATICALLY EXCEPT FOR VERTICAL POSITION 6 WHICH THE
017873,000914: # OPERATOR MUST DO. (SEE POSITION 6 BELOW)
017874,000915: 24,3431 37746 POSN1 CA HALF # X UP, Y SOUTH, Z EAST
017875,000916: 24,3432 55400 TS XSM
017876,000917: 24,3433 55410 TS YSM +2 # NBDY = DH
017877,000918: 24,3434 55420 TS ZSM +4
017878,000919: 24,3435 37767 NGUBGH CA ZERO
017879,000920: 24,3436 55541 TS PIPINDEX
017880,000921: 24,3437 01546 TC QPLACE
017881,000922:
017882,000923:
017883,000924: 24,3440 47746 POSN2 CS HALF # X DOWN, Y WEST, Z NORTH
017884,000925: 24,3441 55400 TS XSM
017885,000926: 24,3442 55412 TS YSM +4 # NBDZ=DH,NBDX-ADIAX=-DV
017886,000927: 24,3443 55416 TS ZSM +2
017887,000928: 24,3444 03435 TC NGUBGH
017888,000929:
017889,000930:
017890,000931: 24,3445 37746 POSN3 CA HALF # Z UP, Y WEST ,X NORTH
017891,000932: 24,3446 55414 TS ZSM
017892,000933: 24,3447 40000 COM # NBDX = -DH
017893,000934: 24,3450 55402 TS XSM +2
017894,000935: 24,3451 55412 TS YSM +4
017895,000936: 24,3452 37762 NSFLAGD CA TWO
017896,000937: 24,3453 55541 TS PIPINDEX
017897,000938: 24,3454 37767 NSBUGD CA ZERO
017898,000939: 24,3455 55576 TS DRIFTT
017899,000940: 24,3456 01546 TC QPLACE
017900,000941:
017901,000942:
017902,000943: 24,3457 37746 POSN4 CA HALF # Z DOWN, Y SOUTH ,X EAST
017903,000944: 24,3460 55404 TS XSM +4
017904,000945: 24,3461 55410 TS YSM +2
017905,000946: 24,3462 40000 COM # NBDY+SRAY=DH,NBDZ+ADIAZ=DV
017906,000947: 24,3463 55414 TS ZSM
017907,000948: 24,3464 37762 CA TWO
017908,000949: 24,3465 55541 TS PIPINDEX
017909,000950: 24,3466 01546 TC QPLACE
017910,000951:
017911,000952: 24,3467 37746 POSN5 CA HALF # Y UP, Z NORTH, X WEST
|
|
Page 431 |
017913,000954: 24,3470 55406 TS YSM
017914,000955: 24,3471 40000 COM # NBDZ-SRAZ=DH
017915,000956: 24,3472 55404 TS XSM +4
017916,000957: 24,3473 55416 TS ZSM +2
017917,000958: 24,3474 37763 CA ONE
017918,000959: 24,3475 55541 TS PIPINDEX
017919,000960: 24,3476 03454 TC NSBUGD
017920,000961:
017921,000962:
017922,000963:
017923,000964: # TO RUN POSITION 6 VERTICAL AFTER PIP TEST POS 6 IS DISPLAYED THE OPERATR
017924,000965: # MUST CALCULATE FROM POSN 2,5 -NBDZ-ADSRAZ (XXX.XX)MERU. WHEN P
017925,000966: # IP DATA FLASHES DO VERB 33 ENTER. THIS STARTS VERTICAL TEST. THEN THE
017926,000967: # DATA XXX.XX MERU AS CALCULATED MUST BE ENTERED INTO DRIFTT. IE VERB 21
017927,000968: # ENTER NOUN 01 ENTER LOCATION OF DRIFTT ENTER + (OR -) XXXXX ENTER
017928,000969: 24,3477 37746 POSN6 CA HALF # Y DOWN, Z EAST, X SOUTH
017929,000970: 24,3500 55402 TS XSM +2
017930,000971: 24,3501 55420 TS ZSM +4
017931,000972: 24,3502 40000 COM # NBDX +ADSRAX = DH, NBDY -ADIAY = -DV
017932,000973: 24,3503 55406 TS YSM
017933,000974: 24,3504 37763 CA ONE
017934,000975: 24,3505 55541 TS PIPINDEX
017935,000976: 24,3506 01546 TC QPLACE
017936,000977:
017937,000978:
017938,000979: 24,3507 47746 POSN7 CS HALF # Z UP-EAST,Y UP-WEST,X NORTH.THIS POSITON
017939,000980: 24,3510 55402 TS XSM +2
017940,000981: 24,3511 33663 CA ROOT1/2
017941,000982: 24,3512 55406 TS YSM # NBDX - .707 ADSRAX = -DH
017942,000983: 24,3513 55414 TS ZSM
017943,000984: 24,3514 55420 TS ZSM +4
017944,000985: 24,3515 40000 COM
017945,000986: 24,3516 55412 TS YSM +4
017946,000987: 24,3517 06067 GEORGES TC FLAG1DWN # UNSET GIMBAL LOCK FLAG
017947,000988: 24,3520 00200 OCT 200
017948,000989: 24,3521 03454 TC NSBUGD
017949,000990:
017950,000991:
017951,000992: 24,3522 37746 POSN8 CA HALF # Z UP-SOUTH,Y UP-NORTH,X EAST.THIS POSITN
017952,000993: 24,3523 55404 TS XSM +4
017953,000994: 24,3524 33663 CA ROOT1/2 # .707(-NBDZ-NBDY) +.5(ADIAZ-ADIAY)
017954,000995: 24,3525 55406 TS YSM # +.5(ADSRAY +ADSRAZ)=DH
017955,000996: 24,3526 55416 TS ZSM +2
017956,000997: 24,3527 55414 TS ZSM
017957,000998: 24,3530 40000 COM
017958,000999: 24,3531 55410 TS YSM +2
017959,001000: 24,3532 03454 TC NSBUGD
017960,001001:
|
|
Page 432 |
017962,001003: 24,3533 33664 OPCHKPOS CA ROOT1SQ # OG=+45DEG,IG=-45DEG,MG=+45DEG.
017963,001004: 24,3534 55400 TS XSM
017964,001005: 24,3535 55410 TS YSM +2
017965,001006: 24,3536 55412 TS YSM +4
017966,001007: 24,3537 55414 TS ZSM
017967,001008: 24,3540 33663 CA ROOT1/2
017968,001009: 24,3541 55406 TS YSM
017969,001010: 24,3542 33666 CA ROOT3SQ
017970,001011: 24,3543 55402 TS XSM +2
017971,001012: 24,3544 55420 TS ZSM +4
017972,001013: 24,3545 43665 CS ROOT2SQ
017973,001014: 24,3546 55404 TS XSM +4
017974,001015: 24,3547 55416 TS ZSM +2
017975,001016: 24,3550 01546 TC QPLACE
017976,001017:
017977,001018: 24,3551 37746 POSN9 CA HALF # X UP EAST,Y UP WEST,Z SOUTH.THIS POSITON
017978,001019: 24,3552 55416 TS ZSM +2
017979,001020: 24,3553 33663 CA ROOT1/2 # -NBDZ +.707 SRAZ =DH
017980,001021: 24,3554 55400 TS XSM
017981,001022: 24,3555 55404 TS XSM +4
017982,001023: 24,3556 55406 TS YSM
017983,001024: 24,3557 40000 COM
017984,001025: 24,3560 55412 TS YSM +4
017985,001026: 24,3561 03454 TC NSBUGD
017986,001027:
017987,001028:
017988,001029: 24,3562 37746 POSN10 CA HALF # X UP NORTH, Y UP SOUTH,Z EAST.THIS POSITN
017989,001030: 24,3563 55420 TS ZSM +4
017990,001031: 24,3564 33663 CA ROOT1/2 # .707(NBDY -NBDX) +.5(ADIAY -ADIAX)
017991,001032: 24,3565 55400 TS XSM # +.5(ADSRAX) = DH
017992,001033: 24,3566 55406 TS YSM
017993,001034: 24,3567 55410 TS YSM +2
017994,001035: 24,3570 40000 COM
017995,001036: 24,3571 55402 TS XSM +2
017996,001037: 24,3572 03454 TC NSBUGD
017997,001038:
017998,001039:
017999,001040: 24,3573 05206 POSN11 TC BANKCALL # COMPASS POSITION
018000,001041: 24,3574 73044 CADR LOADXSM
018001,001042: 24,3575 01546 TC QPLACE
018002,001043:
018003,001044:
018004,001045: 24,3576 30342 SHOWLD CA DSPTEM2
018005,001046: 24,3577 55527 TS LENGTHOT
018006,001047: 24,3600 30343 CA DSPTEM2 +1
018007,001048: 24,3601 55536 TS NBPOS
018008,001049: 24,3602 30344 CA DSPTEM2 +2
018009,001050:
|
|
Page 433 |
018011,001052: 24,3603 55544 TS POSITON
018012,001053: 24,3604 00002 TC Q
018013,001054:
018014,001055: 24,3605 00006 SHOW EXTEND
018015,001056: 24,3606 23546 QXCH QPLACE
018016,001057: 24,3607 31544 SHOW1 CA POSITON
018017,001058: 24,3610 54344 TS DSPTEM2 +2
018018,001059: 24,3611 33643 CA VB06N66
018019,001060: 24,3612 04657 TC NVSBWAIT
018020,001061: 24,3613 04622 TC FLASHON
018021,001062: 24,3614 04475 TC ENDIDLE
018022,001063: 24,3615 02241 TC FINISH
018023,001064: 24,3616 01546 TC QPLACE
018024,001065: 24,3617 03576 TC SHOWLD
018025,001066: 24,3620 13607 TCF SHOW1
018026,001067:
018027,001068:
018028,001069: 24,3621 00006 LOADGTSM EXTEND # THIS LOADS XSM INTO GEOMATRX
018029,001070: 24,3622 23546 QXCH QPLACE
018030,001071: 24,3623 06112 TC INTPRET
018031,001072: 24,3624 77775 VLOAD
018032,001073: 24,3625 02401 XSM
018033,001074: 24,3626 26750 STOVL GEOMTRX
018034,001075: 24,3627 02407 YSM
018035,001076: 24,3630 26756 STOVL GEOMTRX +6
018036,001077: 24,3631 02415 ZSM
018037,001078: 24,3632 02764 STORE GEOMTRX +12D
018038,001079: 24,3633 77776 EXIT
018039,001080: 24,3634 01546 TC QPLACE
018040,001081:
|
|
Page 434 |
018042,001083: 24,3635 14C EQUALS 0014
018043,001084: 24,3635 02130 V21N30E OCT 02130
018044,001085: 24,3636 04000 DESANGLE DEC 2048 B-14
018045,001086: 24,3637 04143 SFCONST DEC .13107
018046,001087: 24,3640 34000 SIZCHK OCT 34000
018047,001088: 24,3641 00264 180DEC DEC 180 B-14
018048,001089: 24,3642 07626 3990DEC DEC 3990 B-14
018049,001090: 24,3643 00666 VB06N66 OCT 00666
018050,001091: 24,3644 01130 TESTTIME DEC 600 B-14
018051,001092: 24,3645 01620 V16N20S OCT 01620
018052,001093: 24,3646 01640 V16N40S OCT 01640
018053,001094: 24,3647 00021 DEC17 DEC 17 B-14
018054,001095: 24,3650 06200 00000 DEC585 2DEC 3200 B+14
018055,001096:
018056,001097: 24,3652 00400 DELYOFF OCT 00400
018057,001098: 24,3653 00024 35474 ERUNITS 2DEC 342844 B-28
018058,001099:
018059,001100: 24,3655 01506 GENPLAD GENADR AZIMUTH
018060,001101: 24,3656 02521 GYRODPL ECADR GYROD
018061,001102: 24,3657 02500 OGCPL ECADR OGC
018062,001103: 24,3660 77760 LOWFOUR OCT 77760
018063,001104: 24,3661 00070 DEC56 DEC 56 B-14
018064,001105: 24,3662 10000 45DEG OCT 10000
018065,001106: 24,3663 13241 ROOT1/2 DEC .353553
018066,001107: 24,3664 10000 ROOT1SQ DEC .250000
018067,001108: 24,3665 15520 ROOT2SQ DEC .426776
018068,001109: 24,3666 02260 ROOT3SQ DEC .073223
018069,001110: 24,3667 01400 XSMADR GENADR XSM
018070,001111:
018071,001112:
018072,001113: 24,3670 00000 00000 SCNBAZ 2DEC 0 B-28
018073,001114: 24,3672 00000 00000 2DEC 0 B-28
018074,001115: 24,3674 20000 00000 LABNBAZ 2DEC .5
018075,001116: 24,3676 00000 00000 2DEC 0 B-28
018076,001117: 24,3700 00000 00000 2DEC 0 B-28
018077,001118: 24,3702 20000 00000 SCNBVER 2DEC .5
018078,001119: 24,3704 00000 00000 2DEC 0 B-28
018079,001120: 24,3706 00000 00000 LABNBVER 2DEC 0 B-28
018080,001121: 24,3710 00000 00000 2DEC 0 B-28
018081,001122: 24,3712 57777 77777 2DEC -.5
018082,001123:
|
|
Page 435 |
018084,001125: 24,3714 00144 1SECX DEC 100 B-14
018085,001126: 24,3715 17127 16705 GEORGED 2DEC .47408845
018086,001127: 24,3717 07314 36223 2DEC .23125894
018087,001128: 24,3721 04521 31140 2DEC .14561689
018088,001129: 24,3723 75755 73521 GEORGEC 2DEC -.06360691
018089,001130: 24,3725 72476 54176 2DEC -.16806746
018090,001131: 24,3727 04771 03365 2DEC .15582939
018091,001132: 24,3731 75644 70661 GEORGEB 2DEC -.06806784
018092,001133: 24,3733 47762 75077 2DEC -.75079894
018093,001134: 24,3735 70023 73740 2DEC -.24878704
018094,001135:
018095,001136: 24,3737 05235 DOCHECKG TC MAKECADR
018096,001137: 24,3740 55547 TS QPLACES
018097,001138: 24,3741 02776 TC CHECKG
018098,001139: 24,3742 31547 CA QPLACES
018099,001140: 24,3743 05230 TC BANKJUMP
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc