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