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.

018102,000002:                                                                                                  ## Copyright:   Public domain.
018103,000003:                                                                                                  ## Filename:    IMU_PERFORMANCE_TESTS_3.agc
018104,000004:                                                                                                  ## Purpose:     A module for revision 0 of BURST120 (Sunburst). It 
018105,000005:                                                                                                  ##              is part of the source code for the Lunar Module's
018106,000006:                                                                                                  ##              (LM) Apollo Guidance Computer (AGC) for Apollo 5.
018107,000007:                                                                                                  ## Assembler:   yaYUL
018108,000008:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
018109,000009:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
018110,000010:                                                                                                  ## Mod history: 2016-09-30 RSB  Created draft version.
018111,000011:                                                                                                  ##              2016-10-18 RSB  Used Aurora 12 file of the same name as a
018112,000012:                                                                                                  ##                              pattern.  A handful of corrections were needed.  
018113,000013:                                                                                                  ##              2016-10-31 RSB  Typos.
018114,000014:                                                                                                  ##              2016-11-01 RSB  More typos.
018115,000015:                                                                                                  ##              2016-11-02 RSB  More typos.
018116,000016:                                                                                                  ##              2016-12-05 RSB  Comment-proofing with octopus/ProoferComments
018117,000017:                                                                                                  ##                              completed, changes made.
018118,000018:                                                                                                  ##              2021-05-30 ABS  Fixed a page marker comment.
018119,000019: 

Page 436

018121,000021: 23,2520                                           BANK     23                                    
018122,000022: 23,2520  E5,1400                                  EBANK=   XSM                                   
018123,000023: 
018124,000024: 
018125,000025: 23,2520           00006        SILVER             EXTEND                                         
018126,000026: 23,2521           23546                           QXCH     QPLACE                                #   SHOULD BE ADDRESS OF STRTWACH
018127,000027: 
018128,000028: 23,2522           11614                           CCS      CALCDIR                               #  2F COMMAND IS POSITIVE THE MINUS TORQ
018129,000029: 23,2523           37753                           CAF      BIT9                                  #   WINDING IS TO BE ENERGIZED
018130,000030: 23,2524           02526                           TC       +2                                    
018131,000031: 23,2525           02530                           TC       TORK                                  #   COMMAND IS NEG SO USE PLUS WINDING
018132,000032: 23,2526           00006                           EXTEND                                         
018133,000033: 23,2527           05014                           WOR      14C                                   #   SELECTS THE MINUS WINDING
018134,000034: 
018135,000035: 23,2530           37743        TORK               CAF      POSMAX                                
018136,000036: 23,2531           54047                           TS       GYROCTR                               #  16383 PULSES =2.8125 DEG LESS ONE PULSE
018137,000037: 
018138,000038: 23,2532           11616                           CCS      GYTOBETQ                              #  C(K)= 1 FOR X, -0 FOR Y, -1FOR Z.
018139,000039: 23,2533           02537                           TC       SELECTX                               
018140,000040: 23,2534           04736                           TC       CCSHOLE                               
018141,000041: 23,2535           02547                           TC       SELECTZ                               
018142,000042: 23,2536           02543                           TC       SELECTY                               
018143,000043: 23,2537           32553        SELECTX            CAF      TORKX                                 #  BBITS 7AND 10 IN CHANNEL 14 WILL
018144,000044: 23,2540           00006                           EXTEND                                         #   SELECT X GYRO AND TURN ON BCSW 1/3200
018145,000045: 23,2541           05014                           WOR      14C                                   #  SSEC LATER BY CHANNEL OUTPUT DESIGN.....
018146,000046: 23,2542           01546                           TC       QPLACE                                
018147,000047: 
018148,000048: 23,2543           32554        SELECTY            CAF      TORKY                                 #  BBITS 8 AND 10 TO TORQ Y GYRO
018149,000049: 23,2544           00006                           EXTEND                                         
018150,000050: 23,2545           05014                           WOR      14C                                   
018151,000051: 23,2546           01546                           TC       QPLACE                                
018152,000052: 
018153,000053: 23,2547           32555        SELECTZ            CAF      TORKZ                                 #  BBITS 7,8AND 10 TO TORQZ GYRO
018154,000054: 23,2550           00006                           EXTEND                                         
018155,000055: 23,2551           05014                           WOR      14C                                   
018156,000056: 23,2552           01546                           TC       QPLACE                                
018157,000057: 23,2553           01100        TORKX              OCT      01100                                 
018158,000058: 23,2554           01200        TORKY              OCT      01200                                 
018159,000059: 23,2555           01300        TORKZ              OCT      01300                                 
018160,000060: 

Page 437

018162,000062: 
018163,000063: 23,2556           37767        SAMODCHK           CAF      ZERO                                  
018164,000064: 23,2557           55563                           TS       TESTNO                                
018165,000065: 23,2560           55550                           TS       RUN                                   
018166,000066: 
018167,000067: 23,2561           03151                           TC       ZEROMODE                              
018168,000068: 23,2562           03175                           TC       OPRTRDLY                              
018169,000069: 
018170,000070: 23,2563           03255                           TC       COARZERO                              
018171,000071: 
018172,000072: 23,2564           03161                           TC       ZEROMAIN                              
018173,000073: 23,2565           03175                           TC       OPRTRDLY                              
018174,000074: 
018175,000075: 23,2566           03151                           TC       ZEROMODE                              
018176,000076: 
018177,000077: 23,2567           37767                           CAF      ZERO                                  
018178,000078: 23,2570           03103                           TC       THETADLD                              
018179,000079: 
018180,000080: 23,2571           33332                           CAF      45ANG                                 
018181,000081: 23,2572           03103                           TC       THETADLD                              
018182,000082: 
018183,000083: 23,2573           03271                           TC       FNZEROFN                              
018184,000084: 
018185,000085: 23,2574           33334                           CAF      90ANG                                 
018186,000086: 23,2575           03103                           TC       THETADLD                              
018187,000087: 
018188,000088: 23,2576           33335                           CAF      135ANG                                
018189,000089: 23,2577           03103                           TC       THETADLD                              
018190,000090: 
018191,000091: 23,2600           37767                           CAF      ZERO                                  
018192,000092: 23,2601           03105                           TC       THETADLD   +2                         
018193,000093: 
018194,000094: 23,2602           03271                           TC       FNZEROFN                              
018195,000095: 
018196,000096: 23,2603           33340                           CAF      180ANG                                
018197,000097: 23,2604           54400                           TS       THETAD                                
018198,000098: 23,2605           54401                           TS       THETAD     +1                         
018199,000099: 23,2606           33333                           CAF      71ANG                                 
018200,000100: 23,2607           03105                           TC       THETADLD   +2                         
018201,000101: 
018202,000102: 23,2610           33341                           CAF      225ANG                                
018203,000103: 23,2611           03103                           TC       THETADLD                              
018204,000104: 
018205,000105: 23,2612           37767                           CAF      ZERO                                  
018206,000106: 23,2613           03103                           TC       THETADLD                              
018207,000107: 
018208,000108: 23,2614           37762                           CAF      TWO                                   
018209,000109: 23,2615           55672        CHK2               TS       CDUNDX                                
018210,000110: 
018211,000111: 23,2616           33342                           CAF      170ANG                                
018212,000112: 23,2617           51672                           INDEX    CDUNDX                                
018213,000113: 

Page 438

018215,000115: 
018216,000116: 23,2620           54400                           TS       THETAD                                
018217,000117: 
018218,000118: 23,2621           05206                           TC       BANKCALL                              
018219,000119: 23,2622           26065                           CADR     IMUCOARS                              
018220,000120: 
018221,000121: 23,2623           33336                           CAF      10ANG                                 
018222,000122: 23,2624           03024                           TC       CDURATE                               
018223,000123: 
018224,000124: 23,2625           33337                           CAF      160ANG                                
018225,000125: 23,2626           03024                           TC       CDURATE                               
018226,000126: 
018227,000127: 23,2627           03047                           TC       CALCRATE                              
018228,000128: 
018229,000129: 23,2630           05206                           TC       BANKCALL                              
018230,000130: 23,2631           26751                           CADR     IMUSTALL                              
018231,000131: 23,2632           12767                           TCF      ENDTST03                              
018232,000132: 
018233,000133: 23,2633           03255                           TC       COARZERO                              
018234,000134: 
018235,000135: 23,2634           11672                           CCS      CDUNDX                                
018236,000136: 23,2635           12615                           TCF      CHK2                                  
018237,000137: 
018238,000138: 23,2636           43332                           CS       45ANG                                 
018239,000139: 23,2637           03103                           TC       THETADLD                              
018240,000140: 
018241,000141: 23,2640           03271                           TC       FNZEROFN                              
018242,000142: 
018243,000143: 23,2641           43335                           CS       135ANG                                
018244,000144: 23,2642           54400                           TS       THETAD                                
018245,000145: 23,2643           54401                           TS       THETAD     +1                         
018246,000146: 23,2644           43333                           CS       71ANG                                 
018247,000147: 23,2645           03105                           TC       THETADLD   +2                         
018248,000148: 
018249,000149: 23,2646           37767                           CAF      ZERO                                  
018250,000150: 23,2647           03105                           TC       THETADLD   +2                         
018251,000151: 
018252,000152: 23,2650           03271                           TC       FNZEROFN                              
018253,000153: 
018254,000154: 23,2651           03255                           TC       COARZERO                              
018255,000155: 
018256,000156: 23,2652           03216                           TC       FINEZERO                              
018257,000157: 23,2653           03216                           TC       FINEZERO                              
018258,000158: 
018259,000159: 23,2654           43346        CHK5               CS       4+6BITS                               
018260,000160: 23,2655           00006                           EXTEND                                         
018261,000161: 23,2656           03012                           WAND     12                                    
018262,000162: 
018263,000163: 23,2657           37761                           CAF      FOUR                                  
018264,000164: 23,2660           05663                           TC       WAITLIST                              
018265,000165: 23,2661  E5,1400                                  EBANK=   XSM                                   

Page 439

018267,000167: 23,2661           02665 46065                     2CADR    ECE1                                  
018268,000168: 
018269,000169: 23,2663           33356                           CAF      ECE2CADR                              
018270,000170: 23,2664           05545                           TC       JOBSLEEP                              
018271,000171: 
018272,000172: 23,2665           33356        ECE1               CAF      ECE2CADR                              
018273,000173: 23,2666           05551                           TC       JOBWAKE                               
018274,000174: 23,2667           05727                           TC       TASKOVER                              
018275,000175: 
018276,000176: 23,2670           46306        ECE2               CS       SIX                                   
018277,000177: 23,2671           61563                           AD       TESTNO                                
018278,000178: 23,2672           00006                           EXTEND                                         
018279,000179: 23,2673           62675                           BZMF     +2                                    
018280,000180: 23,2674           12716                           TCF      CHKX                                  
018281,000181: 
018282,000182: 23,2675           51563                           INDEX    TESTNO                                
018283,000183: 23,2676           32771                           CAF      ERCTRANG                              
018284,000184: 23,2677           54400                           TS       THETAD                                
018285,000185: 23,2700           54401                           TS       THETAD     +1                         
018286,000186: 23,2701           54402                           TS       THETAD     +2                         
018287,000187: 
018288,000188: 23,2702           37756                           CAF      BIT6                                  
018289,000189: 23,2703           00006                           EXTEND                                         
018290,000190: 23,2704           05012                           WOR      12                                    
018291,000191: 
018292,000192: 23,2705           00004                           INHINT                                         
018293,000193: 23,2706           37762                           CAF      TWO                                   
018294,000194: 23,2707           05663                           TC       WAITLIST                              
018295,000195: 23,2710  E5,1400                                  EBANK=   XSM                                   
018296,000196: 23,2710           02612 22065                     2CADR    ATTCK2                                
018297,000197: 
018298,000198: 23,2712           00003                           RELINT                                         
018299,000199: 
018300,000200: 23,2713           03175                           TC       OPRTRDLY                              
018301,000201: 
018302,000202: 23,2714           25563                           INCR     TESTNO                                
018303,000203: 
018304,000204: 23,2715           12654                           TCF      CHK5                                  
018305,000205: 
018306,000206: 23,2716           03255        CHKX               TC       COARZERO                              
018307,000207: 
018308,000208: 23,2717           37767                           CAF      ZERO                                  
018309,000209: 23,2720           55563                           TS       TESTNO                                
018310,000210: 
018311,000211: 23,2721           05206                           TC       BANKCALL                              
018312,000212: 23,2722           20250                           CADR     RRZERO                                
018313,000213: 23,2723           05206                           TC       BANKCALL                              
018314,000214: 23,2724           26745                           CADR     RADSTALL                              
018315,000215: 23,2725           12767                           TCF      ENDTST03                              
018316,000216: 

Page 440

018318,000218: 23,2726           51563        CHK6               INDEX    TESTNO                                
018319,000219: 23,2727           33000                           CAF      RADECNTR                              
018320,000220: 23,2730           54423                           TS       TANG       +1                         
018321,000221: 23,2731           54422                           TS       TANG                                  
018322,000222: 
018323,000223: 23,2732           05206                           TC       BANKCALL                              
018324,000224: 23,2733           20364                           CADR     RRDESNB                               
018325,000225: 
018326,000226: 23,2734           05206                           TC       BANKCALL                              
018327,000227: 23,2735           26745                           CADR     RADSTALL                              
018328,000228: 23,2736           12767                           TCF      ENDTST03                              
018329,000229: 
018330,000230: 23,2737           03170                           TC       RROPRDLY                              
018331,000231: 
018332,000232: 23,2740           25563                           INCR     TESTNO                                
018333,000233: 
018334,000234: 23,2741           47761                           CS       FOUR                                  
018335,000235: 23,2742           61563                           AD       TESTNO                                
018336,000236: 23,2743           00006                           EXTEND                                         
018337,000237: 23,2744           62726                           BZMF     CHK6                                  
018338,000238: 
018339,000239: 23,2745           37767                           CAF      ZERO                                  
018340,000240: 23,2746           55563                           TS       TESTNO                                
018341,000241: 23,2747           54353                           TS       ALTRATE                               
018342,000242: 23,2750           54351                           TS       ALT                                   
018343,000243: 23,2751           54352                           TS       ALT        +1                         
018344,000244: 
018345,000245: 23,2752           47763                           CS       ONE                                   
018346,000246: 23,2753           54350                           TS       DIDFLG                                
018347,000247: 
018348,000248: 23,2754           51563        CHK7               INDEX    TESTNO                                
018349,000249: 23,2755           33005                           CAF      RRRATFPS                              
018350,000250: 23,2756           54357                           TS       FORVEL                                
018351,000251: 23,2757           54360                           TS       LATVEL                                
018352,000252: 
018353,000253: 23,2760           03170                           TC       RROPRDLY                              
018354,000254: 
018355,000255: 23,2761           25563                           INCR     TESTNO                                
018356,000256: 
018357,000257: 23,2762           47757                           CS       BIT5                                  
018358,000258: 23,2763           67762                           AD       TWO                                   
018359,000259: 23,2764           61563                           AD       TESTNO                                
018360,000260: 23,2765           00006                           EXTEND                                         
018361,000261: 23,2766           62754                           BZMF     CHK7                                  
018362,000262: 
018363,000263: 23,2767           05206        ENDTST03           TC       BANKCALL                              
018364,000264: 23,2770           30770                           CADR     ENDTEST                               
018365,000265: 

Page 441

018367,000267: 23,2771           03013        ERCTRANG           OCT      03013                                 
018368,000268: 23,2772           02660                           OCT      02660                                 
018369,000269: 23,2773           01042                           OCT      01042                                 
018370,000270: 23,2774           00000                           OCT      00000                                 
018371,000271: 23,2775           76736                           OCT      76736                                 
018372,000272: 23,2776           75120                           OCT      75120                                 
018373,000273: 23,2777           74765                           OCT      74765                                 
018374,000274: 
018375,000275: 
018376,000276: 23,3000           01463        RADECNTR           OCT      01463                                 
018377,000277: 23,3001           01042                           OCT      01042                                 
018378,000278: 23,3002           00000                           OCT      00000                                 
018379,000279: 23,3003           76736                           OCT      76736                                 
018380,000280: 23,3004           76315                           OCT      76315                                 
018381,000281: 
018382,000282: 
018383,000283: 23,3005           00000        RRRATFPS           OCT      00000                                 
018384,000284: 23,3006           00001                           OCT      00001                                 
018385,000285: 23,3007           00002                           OCT      00002                                 
018386,000286: 23,3010           00004                           OCT      00004                                 
018387,000287: 23,3011           00010                           OCT      00010                                 
018388,000288: 23,3012           00020                           OCT      00020                                 
018389,000289: 23,3013           00040                           OCT      00040                                 
018390,000290: 23,3014           00100                           OCT      00100                                 
018391,000291: 23,3015           00200                           OCT      00200                                 
018392,000292: 23,3016           00237                           OCT      00237                                 
018393,000293: 23,3017           00400                           OCT      00400                                 
018394,000294: 23,3020           00545                           OCT      00545                                 
018395,000295: 23,3021           00544                           OCT      00544                                 
018396,000296: 23,3022           77540                           OCT      77540                                 
018397,000297: 23,3023           77232                           OCT      77232                                 
018398,000298: 

Page 442

018400,000300: 23,3024           00006        CDURATE            EXTEND                                         
018401,000301: 23,3025           23546                           QXCH     QPLACE                                
018402,000302: 
018403,000303: 23,3026           55577                           TS       CDULIMIT                              
018404,000304: 
018405,000305: 23,3027           10067                           CCS      NEWJOB                                
018406,000306: 23,3030           05532                           TC       CHANG1                                
018407,000307: 
018408,000308: 23,3031           41577                           CS       CDULIMIT                              
018409,000309: 23,3032           51672                           INDEX    CDUNDX                                
018410,000310: 23,3033           60032                           AD       CDUX                                  #  CATCH FIRST PULSE
018411,000311: 23,3034           00006                           EXTEND                                         
018412,000312: 23,3035           63027                           BZMF     CDURATE    +3                         #  LOOK AGAIN
018413,000313: 
018414,000314: 23,3036           51672                           INDEX    CDUNDX                                
018415,000315: 23,3037           30032                           CAE      CDUX                                  
018416,000316: 23,3040           57575                           XCH      CDUREADF                              #  CDU FINAL READING
018417,000317: 23,3041           57576                           XCH      CDUREADI                              #  CDU INITIAL READING
018418,000318: 
018419,000319: 23,3042           05026                           TC       FINETIME                              
018420,000320: 23,3043           53573                           DXCH     CDUTIMEF                              #  DP FINAL TIME
018421,000321: 23,3044           53571                           DXCH     CDUTIMEI                              #  DP INITIAL READING
018422,000322: 
018423,000323: 23,3045           00003                           RELINT                                         
018424,000324: 23,3046           01546                           TC       QPLACE                                
018425,000325: 
018426,000326: 
018427,000327: 
018428,000328: 23,3047           00006        CALCRATE           EXTEND                                         
018429,000329: 23,3050           23546                           QXCH     QPLACE                                
018430,000330: 
018431,000331: 23,3051           53576                           DXCH     CDUREADF                              
018432,000332: 23,3052           00006                           EXTEND                                         
018433,000333: 23,3053           20001                           MSU      L                                     
018434,000334: 23,3054           55677                           TS       CDUANG                                
018435,000335: 
018436,000336: 23,3055           06112                           TC       INTPRET                               
018437,000337: 23,3056           45345                           DLOAD    DSU                                   
018438,000338: 23,3057           02573                                    CDUTIMEF                              
018439,000339: 23,3060           02571                                    CDUTIMEI                              
018440,000340: 23,3061           67206                           PUSH     SLOAD                                 
018441,000341: 23,3062           02700                                    CDUANG                                
018442,000342: 23,3063           56261                           SR       DDV                                   
018443,000343: 23,3064           20617                                    14D                                   
018444,000344: 23,3065           47005                           DMP      RTB                                   
018445,000345: 23,3066           07362                                    DEG/SEC                               
018446,000346: 23,3067           33520                                    SGNAGREE                              
018447,000347: 23,3070           00343                           STORE    DSPTEM2                               
018448,000348: 

Page 443

018450,000350: 23,3071           77776                           EXIT                                           
018451,000351: 
018452,000352: 23,3072           33353        RATEDSP            CAF      V06N66X                               
018453,000353: 23,3073           04657                           TC       NVSBWAIT                              
018454,000354: 23,3074           04622                           TC       FLASHON                               
018455,000355: 23,3075           04475                           TC       ENDIDLE                               
018456,000356: 23,3076           12767                           TCF      ENDTST03                              
018457,000357: 23,3077           13101                           TCF      +2                                    
018458,000358: 23,3100           13072                           TCF      RATEDSP                               
018459,000359: 
018460,000360: 23,3101           25550                           INCR     RUN                                   
018461,000361: 23,3102           01546                           TC       QPLACE                                
018462,000362: 

Page 444

018464,000364: 23,3103           54400        THETADLD           TS       THETAD                                
018465,000365: 23,3104           54401                           TS       THETAD     +1                         
018466,000366: 23,3105           54402                           TS       THETAD     +2                         
018467,000367: 
018468,000368: 23,3106           00006                           EXTEND                                         
018469,000369: 23,3107           23546                           QXCH     QPLACE                                
018470,000370: 
018471,000371: 23,3110           37765                           CAF      SEVEN                                 
018472,000372: 23,3111           55551        THLD1              TS       STOREPL                               
018473,000373: 
018474,000374: 23,3112           05206                           TC       BANKCALL                              
018475,000375: 23,3113           26065                           CADR     IMUCOARS                              
018476,000376: 23,3114           05206                           TC       BANKCALL                              
018477,000377: 23,3115           26751                           CADR     IMUSTALL                              
018478,000378: 23,3116           12767                           TCF      ENDTST03                              
018479,000379: 
018480,000380: 23,3117           11551                           CCS      STOREPL                               
018481,000381: 23,3120           03111                           TC       THLD1                                 
018482,000382: 
018483,000383: 23,3121           03175                           TC       OPRTRDLY                              
018484,000384: 
018485,000385: 23,3122           01546                           TC       QPLACE                                
018486,000386: 
018487,000387: 
018488,000388: 
018489,000389: 23,3123           00006        FINEALGN           EXTEND                                         
018490,000390: 23,3124           23546                           QXCH     QPLACE                                
018491,000391: 
018492,000392: 23,3125           05206                           TC       BANKCALL                              
018493,000393: 23,3126           26252                           CADR     IMUFINE                               
018494,000394: 23,3127           05206                           TC       BANKCALL                              
018495,000395: 23,3130           26751                           CADR     IMUSTALL                              
018496,000396: 23,3131           12767                           TCF      ENDTST03                              
018497,000397: 
018498,000398: 23,3132           01546                           TC       QPLACE                                
018499,000399: 

Page 445

018501,000401: 23,3133           00006        CH30DSPY           EXTEND                                         
018502,000402: 23,3134           23546                           QXCH     QPLACE                                
018503,000403: 
018504,000404: 23,3135           33344                           CAF      OCT30                                 
018505,000405: 23,3136           54146                           TS       MPAC       +2                         
018506,000406: 23,3137           33347                           CAF      V01N10X                               
018507,000407: 23,3140           04657                           TC       NVSBWAIT                              
018508,000408: 23,3141           04622                           TC       FLASHON                               
018509,000409: 23,3142           04475                           TC       ENDIDLE                               
018510,000410: 23,3143           12767                           TCF      ENDTST03                              
018511,000411: 23,3144           13146                           TCF      +2                                    
018512,000412: 23,3145           13135                           TCF      CH30DSPY   +2                         
018513,000413: 
018514,000414: 23,3146           04626                           TC       FLASHOFF                              
018515,000415: 23,3147           25550                           INCR     RUN                                   
018516,000416: 23,3150           01546                           TC       QPLACE                                
018517,000417: 
018518,000418: 
018519,000419: 
018520,000420: 23,3151           00006        ZEROMODE           EXTEND                                         
018521,000421: 23,3152           23546                           QXCH     QPLACE                                
018522,000422: 
018523,000423: 23,3153           05206                           TC       BANKCALL                              
018524,000424: 23,3154           26000                           CADR     IMUZERO                               
018525,000425: 23,3155           05206                           TC       BANKCALL                              
018526,000426: 23,3156           26751                           CADR     IMUSTALL                              
018527,000427: 23,3157           12767                           TCF      ENDTST03                              
018528,000428: 
018529,000429: 23,3160           01546                           TC       QPLACE                                
018530,000430: 
018531,000431: 
018532,000432: 
018533,000433: 23,3161           43346        ZEROMAIN           CS       4+6BITS                               
018534,000434: 23,3162           00006                           EXTEND                                         
018535,000435: 23,3163           03012                           WAND     12                                    
018536,000436: 
018537,000437: 23,3164           37757                           CAF      BIT5                                  
018538,000438: 23,3165           00006                           EXTEND                                         
018539,000439: 23,3166           05012                           WOR      12                                    
018540,000440: 
018541,000441: 23,3167           00002                           TC       Q                                     
018542,000442: 

Page 446

018544,000444: 23,3170           00006        RROPRDLY           EXTEND                                         
018545,000445: 23,3171           23545                           QXCH     QPLAC                                 
018546,000446: 
018547,000447: 23,3172           25550                           INCR     RUN                                   
018548,000448: 
018549,000449: 23,3173           33352                           CAF      V06N40X                               
018550,000450: 23,3174           13201                           TCF      OPRTRDLY   +4                         
018551,000451: 
018552,000452: 
018553,000453: 23,3175           00006        OPRTRDLY           EXTEND                                         
018554,000454: 23,3176           23545                           QXCH     QPLAC                                 
018555,000455: 
018556,000456: 23,3177           25550                           INCR     RUN                                   
018557,000457: 23,3200           33351                           CAF      V06N20X                               
018558,000458: 23,3201           04657                           TC       NVSBWAIT                              
018559,000459: 23,3202           33354                           CAF      V33N00X                               
018560,000460: 23,3203           04657                           TC       NVSBWAIT                              
018561,000461: 23,3204           31550                           CA       RUN                                   
018562,000462: 23,3205           73343                           MASK     6LOW                                  
018563,000463: 23,3206           04657                           TC       NVSBWAIT                              
018564,000464: 23,3207           04622                           TC       FLASHON                               
018565,000465: 23,3210           04475                           TC       ENDIDLE                               
018566,000466: 23,3211           12767                           TCF      ENDTST03                              
018567,000467: 23,3212           13214                           TCF      +2                                    
018568,000468: 23,3213           13200                           TCF      OPRTRDLY   +3                         
018569,000469: 
018570,000470: 23,3214           04626                           TC       FLASHOFF                              
018571,000471: 23,3215           01545                           TC       QPLAC                                 
018572,000472: 
018573,000473: 23,3216           00006        FINEZERO           EXTEND                                         
018574,000474: 23,3217           23545                           QXCH     QPLAC                                 
018575,000475: 
018576,000476: 23,3220           05206                           TC       BANKCALL                              
018577,000477: 23,3221           26000                           CADR     IMUZERO                               
018578,000478: 
018579,000479: 23,3222           37762                           CAF      TWO                                   
018580,000480: 23,3223           55512                           TS       EROPTN                                
018581,000481: 23,3224           37761                           CAF      FOUR                                  
018582,000482: 23,3225           55544                           TS       POSITON                               
018583,000483: 
018584,000484: 23,3226           00004                           INHINT                                         
018585,000485: 23,3227           47752                           CS       BIT10                                 
018586,000486: 23,3230           70074                           MASK     STATE                                 
018587,000487: 23,3231           67752                           AD       BIT10                                 
018588,000488: 23,3232           54074                           TS       STATE                                 
018589,000489: 23,3233           00003                           RELINT                                         
018590,000490: 

Page 447

018592,000492: 23,3234           05206                           TC       BANKCALL                              
018593,000493: 23,3235           31003                           CADR     LEMLAB                                
018594,000494: 
018595,000495: 23,3236           04644        SAMODRTN           TC       GRABWAIT                              
018596,000496: 
018597,000497: 23,3237           03161                           TC       ZEROMAIN                              
018598,000498: 
018599,000499: 23,3240           00004                           INHINT                                         
018600,000500: 23,3241           37751                           CAF      BIT11                                 
018601,000501: 23,3242           05663                           TC       WAITLIST                              
018602,000502: 23,3243  E5,1400                                  EBANK=   XSM                                   
018603,000503: 23,3243           03247 46065                     2CADR    DSPY30                                
018604,000504: 
018605,000505: 23,3245           33355                           CAF      CH30WAKE                              
018606,000506: 23,3246           05545                           TC       JOBSLEEP                              
018607,000507: 
018608,000508: 23,3247           33355        DSPY30             CAF      CH30WAKE                              
018609,000509: 23,3250           05551                           TC       JOBWAKE                               
018610,000510: 23,3251           05727                           TC       TASKOVER                              
018611,000511: 
018612,000512: 23,3252           03133        DSPYCH30           TC       CH30DSPY                              
018613,000513: 23,3253           03151                           TC       ZEROMODE                              
018614,000514: 
018615,000515: 23,3254           01545                           TC       QPLAC                                 
018616,000516: 
018617,000517: 
018618,000518: 23,3255           37767        COARZERO           CAF      ZERO                                  
018619,000519: 23,3256           54400                           TS       THETAD                                
018620,000520: 23,3257           54401                           TS       THETAD     +1                         
018621,000521: 23,3260           54402                           TS       THETAD     +2                         
018622,000522: 
018623,000523: 23,3261           00006                           EXTEND                                         
018624,000524: 23,3262           23546                           QXCH     QPLACE                                
018625,000525: 
018626,000526: 23,3263           05206                           TC       BANKCALL                              
018627,000527: 23,3264           26065                           CADR     IMUCOARS                              
018628,000528: 23,3265           05206                           TC       BANKCALL                              
018629,000529: 23,3266           26751                           CADR     IMUSTALL                              
018630,000530: 23,3267           12767                           TCF      ENDTST03                              
018631,000531: 
018632,000532: 23,3270           01546                           TC       QPLACE                                
018633,000533: 

Page 448

018635,000535: 23,3271           00006        FNZEROFN           EXTEND                                         
018636,000536: 23,3272           23545                           QXCH     QPLAC                                 
018637,000537: 
018638,000538: 23,3273           03123                           TC       FINEALGN                              
018639,000539: 
018640,000540: 23,3274           30032                           CAE      CDUX                                  
018641,000541: 23,3275           55575                           TS       CDUREADF                              
018642,000542: 23,3276           30033                           CAE      CDUY                                  
018643,000543: 23,3277           55576                           TS       CDUREADI                              
018644,000544: 23,3300           30034                           CAE      CDUZ                                  
018645,000545: 23,3301           55577                           TS       CDULIMIT                              
018646,000546: 
018647,000547: 23,3302           03151                           TC       ZEROMODE                              
018648,000548: 
018649,000549: 23,3303           31575        FZF2               CAE      CDUREADF                              
018650,000550: 23,3304           00006                           EXTEND                                         
018651,000551: 23,3305           20032                           MSU      CDUX                                  
018652,000552: 23,3306           54337                           TS       DSPTEM1                               
018653,000553: 
018654,000554: 23,3307           31576                           CAE      CDUREADI                              
018655,000555: 23,3310           00006                           EXTEND                                         
018656,000556: 23,3311           20033                           MSU      CDUY                                  
018657,000557: 23,3312           54340                           TS       DSPTEM1    +1                         
018658,000558: 
018659,000559: 23,3313           31577                           CAE      CDULIMIT                              
018660,000560: 23,3314           00006                           EXTEND                                         
018661,000561: 23,3315           20034                           MSU      CDUZ                                  
018662,000562: 23,3316           54341                           TS       DSPTEM1    +2                         
018663,000563: 
018664,000564: 23,3317           33350        FZFDSP             CAF      V05N30X                               
018665,000565: 23,3320           04657                           TC       NVSBWAIT                              
018666,000566: 23,3321           04622                           TC       FLASHON                               
018667,000567: 23,3322           04475                           TC       ENDIDLE                               
018668,000568: 23,3323           12767                           TCF      ENDTST03                              
018669,000569: 23,3324           13326                           TCF      +2                                    
018670,000570: 23,3325           13317                           TCF      FZFDSP                                
018671,000571: 
018672,000572: 23,3326           25550                           INCR     RUN                                   
018673,000573: 23,3327           01545                           TC       QPLAC                                 
018674,000574: 

Page 449

018676,000576: 23,3330           00133        1ANG               OCT      00133                                 
018677,000577: 23,3331           06000        33.75ANG           OCT      06000                                 
018678,000578: 23,3332           10000        45ANG              OCT      10000                                 
018679,000579: 23,3333           14477        71ANG              OCT      14477                                 
018680,000580: 23,3334           20000        90ANG              OCT      20000                                 
018681,000581: 23,3335           30000        135ANG             OCT      30000                                 
018682,000582: 23,3336           01616        10ANG              OCT      01616                                 
018683,000583: 23,3337           34344        160ANG             OCT      34344                                 
018684,000584: 23,3340           40000        180ANG             OCT      40000                                 
018685,000585: 23,3341           50000        225ANG             OCT      50000                                 
018686,000586: 23,3342           36162        170ANG             OCT      36162                                 
018687,000587: 
018688,000588: 23,3343           00077        6LOW               OCT      77                                    
018689,000589: 23,3344           00030        OCT30              OCT      30                                    
018690,000590: 23,3345           00454        3SEC               DEC      300        B-14                       
018691,000591: 23,3346           00050        4+6BITS            OCT      00050                                 
018692,000592: 
018693,000593: 23,3347           00110        V01N10X            OCT      00110                                 
018694,000594: 23,3350           00530        V05N30X            OCT      00530                                 
018695,000595: 23,3351           00620        V06N20X            OCT      00620                                 
018696,000596: 23,3352           00640        V06N40X            OCT      00640                                 
018697,000597: 23,3353           00666        V06N66X            OCT      00666                                 
018698,000598: 23,3354           03300        V33N00X            OCT      03300                                 
018699,000599: 
018700,000600: 23,3355           47252        CH30WAKE           CADR     DSPYCH30                              
018701,000601: 23,3356           46670        ECE2CADR           CADR     ECE2                                  
018702,000602: 23,3357           47303        FZF2CADR           CADR     FZF2                                  
018703,000603: 23,3360           02500        OGCECADR           ECADR    OGC                                   
018704,000604: 
018705,000605: 23,3361           00043 05000  DEG/SEC            2DEC     576000     B-28                       

End of include-file IMU_PERFORMANCE_TESTS_3.agc.  Parent file is MAIN.agc