Source Code

   YAYUL: ASSEMBLE REVISION 5 OF PROGRAM BOREALIS       BY MSTEWART MAR. 27,2017
This is a modern AGC system self-test program, though based on the Apollo-era AURORA 12 program, and was not written by the original AGC developers, but rather by Mike Stewart. All of the original AURORA 12 DAP code added by the DAP Group has been removed, and extensive new system test code has been added in its place. This allows more in-depth testing of CPU behavior, both in AGC software simulations and hardware simulations.

021485,000002:                                                                                                  ## Copyright:   Public domain.
021486,000003:                                                                                                  ## Filename:    IMU_PERFORMANCE_TESTS_3.agc
021487,000004:                                                                                                  ## Purpose:     This program is designed to extensively test the Apollo Guidance Computer
021488,000005:                                                                                                  ##              (specifically the LM instantiation of it). It is built on top of a heavily
021489,000006:                                                                                                  ##              stripped-down Aurora 12, with all code ostensibly added by the DAP Group
021490,000007:                                                                                                  ##              removed. Instead Borealis expands upon the tests provided by Aurora,
021491,000008:                                                                                                  ##              including corrected tests from Retread 44 and tests from Ron Burkey's
021492,000009:                                                                                                  ##              Validation.
021493,000010:                                                                                                  ## Assembler:   yaYUL
021494,000011:                                                                                                  ## Contact:     Mike Stewart <mastewar1@gmail.com>.
021495,000012:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
021496,000013:                                                                                                  ## Mod history: 2016-12-20 MAS  Created from Aurora 12 (with much DAP stuff removed).
021497,000014: 
021498,000015: 16,2520                                           SETLOC   ENDPINS3                              
021499,000016: 16,2520  E5,1400                                  EBANK=   XSM                                   
021500,000017: 
021501,000018: 
021502,000019: 
021503,000020: 16,2520           00006        SILVER             EXTEND                                         
021504,000021: 16,2521           23546                           QXCH     QPLACE                                #   SHOULD BE ADDRESS OF STRTWACH
021505,000022: 
021506,000023: 16,2522           11614                           CCS      CALCDIR    2F                         #  2F COMMAND IS POSITIVE THE MINUS TORQ
021507,000024: 16,2523           37647                           CAF      BIT9                                  #   WINDING IS TO BE ENERGIZED
021508,000025: 16,2524           02526                           TC       +2                                    
021509,000026: 16,2525           02530                           TC       TORK                                  #   COMMAND IS NEG SO USE PLUS WINDING
021510,000027: 16,2526           00006                           EXTEND                                         
021511,000028: 16,2527           05014                           WOR      14C                                   #   SELECTS THE MINUS WINDING
021512,000029: 
021513,000030: 16,2530           37637        TORK               CAF      POSMAX                                
021514,000031: 16,2531           54047                           TS       GYROCTR                               #  16383 PULSES =2.8125 DEG LESS ONE PULSE
021515,000032: 
021516,000033: 16,2532           11616                           CCS      GYTOBETQ                              #  C(K)= 1 FOR X, -0 FOR y, -1FOR Z.
021517,000034: 16,2533           02537                           TC       SELECTX                               
021518,000035: 16,2534           05456                           TC       CCSHOLE                               
021519,000036: 16,2535           02547                           TC       SELECTZ                               
021520,000037: 16,2536           02543                           TC       SELECTY                               
021521,000038: 16,2537           32553        SELECTX            CAF      TORKX                                 #  BBITS 7AND 10 IN CHANNEL 14 WILL
021522,000039: 16,2540           00006                           EXTEND                                         #   SELECT X GYRO AND TURN ON BCSW 1/3200
021523,000040: 16,2541           05014                           WOR      14C                                   #  SSEC LATER BY CHANNEL OUTPUT DESIGN.....
021524,000041: 16,2542           01546                           TC       QPLACE                                
021525,000042: 
021526,000043: 16,2543           32554        SELECTY            CAF      TORKY                                 #  BBITS 8 AND 10 TO TORQ Y GYRO
021527,000044: 16,2544           00006                           EXTEND                                         
021528,000045: 16,2545           05014                           WOR      14C                                   
021529,000046: 16,2546           01546                           TC       QPLACE                                
021530,000047: 
021531,000048: 16,2547           32555        SELECTZ            CAF      TORKZ                                 #  BBITS 7,8AND 10 TO TORQZ GYRO
021532,000049: 16,2550           00006                           EXTEND                                         
021533,000050: 16,2551           05014                           WOR      14C                                   
021534,000051: 16,2552           01546                           TC       QPLACE                                
021535,000052: 16,2553           01100        TORKX              OCT      01100                                 
021536,000053: 16,2554           01200        TORKY              OCT      01200                                 
021537,000054: 16,2555           01300        TORKZ              OCT      01300                                 
021538,000055: 
021539,000056: 
021540,000057: 16,2556           37665        SAMODCHK           CAF      ZERO                                  
021541,000058: 16,2557           55563                           TS       TESTNO                                
021542,000059: 16,2560           55550                           TS       RUN                                   
021543,000060: 
021544,000061: 16,2561           03150                           TC       ZEROMODE                              
021545,000062: 16,2562           03174                           TC       OPRTRDLY                              
021546,000063: 
021547,000064: 16,2563           03244                           TC       COARZERO                              
021548,000065: 
021549,000066: 16,2564           03160                           TC       ZEROMAIN                              
021550,000067: 16,2565           03174                           TC       OPRTRDLY                              
021551,000068: 
021552,000069: 16,2566           03150                           TC       ZEROMODE                              
021553,000070: 
021554,000071: 16,2567           37665                           CAF      ZERO                                  
021555,000072: 16,2570           03102                           TC       THETADLD                              
021556,000073: 
021557,000074: 16,2571           33332                           CAF      45ANG                                 
021558,000075: 16,2572           03102                           TC       THETADLD                              
021559,000076: 
021560,000077: 16,2573           03260                           TC       FNZEROFN                              
021561,000078: 
021562,000079: 16,2574           33334                           CAF      90ANG                                 
021563,000080: 16,2575           03102                           TC       THETADLD                              
021564,000081: 
021565,000082: 16,2576           33335                           CAF      135ANG                                
021566,000083: 16,2577           03102                           TC       THETADLD                              
021567,000084: 
021568,000085: 16,2600           33332                           CAF      45ANG                                 
021569,000086: 16,2601           03104                           TC       THETADLD   +2                         
021570,000087: 
021571,000088: 16,2602           03260                           TC       FNZEROFN                              
021572,000089: 
021573,000090: 16,2603           33340                           CAF      180ANG                                
021574,000091: 16,2604           54400                           TS       THETAD                                
021575,000092: 16,2605           54401                           TS       THETAD     +1                         
021576,000093: 16,2606           33333                           CAF      71ANG                                 
021577,000094: 16,2607           03104                           TC       THETADLD   +2                         
021578,000095: 
021579,000096: 16,2610           33341                           CAF      225ANG                                
021580,000097: 16,2611           03102                           TC       THETADLD                              
021581,000098: 
021582,000099: 16,2612           37665                           CAF      ZERO                                  
021583,000100: 16,2613           03102                           TC       THETADLD                              
021584,000101: 
021585,000102: 16,2614           37656                           CAF      TWO                                   
021586,000103: 16,2615           55672        CHK2               TS       CDUNDX                                
021587,000104: 
021588,000105: 16,2616           33342                           CAF      170ANG                                
021589,000106: 16,2617           51672                           INDEX    CDUNDX                                
021590,000107: 
021591,000108: 
021592,000109: 16,2620           54400                           TS       THETAD                                
021593,000110: 
021594,000111: 16,2621           04065                           TC       BANKCALL                              
021595,000112: 16,2622           26055                           CADR     IMUCOARS                              
021596,000113: 
021597,000114: 16,2623           33336                           CAF      10ANG                                 
021598,000115: 16,2624           03023                           TC       CDURATE                               
021599,000116: 
021600,000117: 16,2625           33337                           CAF      160ANG                                
021601,000118: 16,2626           03023                           TC       CDURATE                               
021602,000119: 
021603,000120: 16,2627           03046                           TC       CALCRATE                              
021604,000121: 
021605,000122: 16,2630           04065                           TC       BANKCALL                              
021606,000123: 16,2631           26716                           CADR     IMUSTALL                              
021607,000124: 16,2632           12766                           TCF      ENDTST03                              
021608,000125: 
021609,000126: 16,2633           03244                           TC       COARZERO                              
021610,000127: 
021611,000128: 16,2634           11672                           CCS      CDUNDX                                
021612,000129: 16,2635           12615                           TCF      CHK2                                  
021613,000130: 
021614,000131: 16,2636           43332                           CS       45ANG                                 
021615,000132: 16,2637           03102                           TC       THETADLD                              
021616,000133: 
021617,000134: 16,2640           03260                           TC       FNZEROFN                              
021618,000135: 
021619,000136: 16,2641           43335                           CS       135ANG                                
021620,000137: 16,2642           54400                           TS       THETAD                                
021621,000138: 16,2643           54401                           TS       THETAD     +1                         
021622,000139: 16,2644           43333                           CS       71ANG                                 
021623,000140: 16,2645           03104                           TC       THETADLD   +2                         
021624,000141: 
021625,000142: 16,2646           03260                           TC       FNZEROFN                              
021626,000143: 
021627,000144: 16,2647           03244                           TC       COARZERO                              
021628,000145: 
021629,000146: 16,2650           03215                           TC       FINEZERO                              
021630,000147: 16,2651           03215                           TC       FINEZERO                              
021631,000148: 
021632,000149: 16,2652           43346        CHK5               CS       4+6BITS                               
021633,000150: 16,2653           00006                           EXTEND                                         
021634,000151: 16,2654           03012                           WAND     12                                    
021635,000152: 16,2655           37655                           CAF      FOUR                                  
021636,000153: 16,2656           04517                           TC       WAITLIST                              
021637,000154: 16,2657           02663 34005                     2CADR    ECE1                                  
021638,000155: 
021639,000156: 16,2661           33355                           CAF      ECE2CADR                              
021640,000157: 16,2662           04377                           TC       JOBSLEEP                              
021641,000158: 
021642,000159: 
021643,000160: 16,2663           33355        ECE1               CAF      ECE2CADR                              
021644,000161: 16,2664           04403                           TC       JOBWAKE                               
021645,000162: 16,2665           04563                           TC       TASKOVER                              
021646,000163: 
021647,000164: 16,2666           46162        ECE2               CS       SIX                                   
021648,000165: 16,2667           61563                           AD       TESTNO                                
021649,000166: 16,2670           00006                           EXTEND                                         
021650,000167: 16,2671           62673                           BZMF     +2                                    
021651,000168: 16,2672           12714                           TCF      CHKX                                  
021652,000169: 
021653,000170: 16,2673           51563                           INDEX    TESTNO                                
021654,000171: 16,2674           32770                           CAF      ERCTRANG                              
021655,000172: 16,2675           54400                           TS       THETAD                                
021656,000173: 16,2676           54401                           TS       THETAD     +1                         
021657,000174: 16,2677           54402                           TS       THETAD     +2                         
021658,000175: 
021659,000176: 16,2700           37652                           CAF      BIT6                                  
021660,000177: 16,2701           00006                           EXTEND                                         
021661,000178: 16,2702           05012                           WOR      12                                    
021662,000179: 
021663,000180: 16,2703           00004                           INHINT                                         
021664,000181: 16,2704           37656                           CAF      TWO                                   
021665,000182: 16,2705           04517                           TC       WAITLIST                              
021666,000183: 16,2706           02613 22005                     2CADR    ATTCK2                                
021667,000184: 
021668,000185: 16,2710           00003                           RELINT                                         
021669,000186: 
021670,000187: 16,2711           03174                           TC       OPRTRDLY                              
021671,000188: 
021672,000189: 16,2712           25563                           INCR     TESTNO                                
021673,000190: 
021674,000191: 16,2713           12652                           TCF      CHK5                                  
021675,000192: 
021676,000193: 16,2714           03244        CHKX               TC       COARZERO                              
021677,000194: 
021678,000195: 16,2715           37665                           CAF      ZERO                                  
021679,000196: 16,2716           55563                           TS       TESTNO                                
021680,000197: 
021681,000198: 16,2717           04065                           TC       BANKCALL                              
021682,000199: 16,2720           20247                           CADR     RRZERO                                
021683,000200: 16,2721           04065                           TC       BANKCALL                              
021684,000201: 16,2722           26712                           CADR     RADSTALL                              
021685,000202: 16,2723           12766                           TCF      ENDTST03                              
021686,000203: 
021687,000204: 16,2724           51563        CHK6               INDEX    TESTNO                                
021688,000205: 16,2725           32777                           CAF      RADECNTR                              
021689,000206: 16,2726           54424                           TS       TANG       +1                         
021690,000207: 16,2727           54423                           TS       TANG                                  
021691,000208: 
021692,000209: 16,2730           06000                           TC       INTPRET                               
021693,000210: 
021694,000211: 
021695,000212: 16,2731           77634                           CALL                                           
021696,000213: 16,2732           20363                                    RRDESNB                               
021697,000214: 
021698,000215: 16,2733           04065                           TC       BANKCALL                              
021699,000216: 16,2734           26712                           CADR     RADSTALL                              
021700,000217: 16,2735           12766                           TCF      ENDTST03                              
021701,000218: 
021702,000219: 16,2736           03167                           TC       RROPRDLY                              
021703,000220: 
021704,000221: 16,2737           25563                           INCR     TESTNO                                
021705,000222: 
021706,000223: 16,2740           47655                           CS       FOUR                                  
021707,000224: 16,2741           61563                           AD       TESTNO                                
021708,000225: 16,2742           00006                           EXTEND                                         
021709,000226: 16,2743           62724                           BZMF     CHK6                                  
021710,000227: 
021711,000228: 16,2744           37665                           CAF      ZERO                                  
021712,000229: 16,2745           55563                           TS       TESTNO                                
021713,000230: 16,2746           54354                           TS       ALTRATE                               
021714,000231: 16,2747           54352                           TS       ALT                                   
021715,000232: 16,2750           54353                           TS       ALT        +1                         
021716,000233: 
021717,000234: 16,2751           47657                           CS       ONE                                   
021718,000235: 16,2752           54351                           TS       DIDFLG                                
021719,000236: 
021720,000237: 16,2753           51563        CHK7               INDEX    TESTNO                                
021721,000238: 16,2754           33004                           CAF      RRRATFPS                              
021722,000239: 16,2755           54360                           TS       FORVEL                                
021723,000240: 16,2756           54361                           TS       LATVEL                                
021724,000241: 
021725,000242: 16,2757           03167                           TC       RROPRDLY                              
021726,000243: 
021727,000244: 16,2760           25563                           INCR     TESTNO                                
021728,000245: 
021729,000246: 16,2761           47653                           CS       BIT5                                  
021730,000247: 16,2762           67656                           AD       TWO                                   
021731,000248: 16,2763           61563                           AD       TESTNO                                
021732,000249: 16,2764           00006                           EXTEND                                         
021733,000250: 16,2765           62753                           BZMF     CHK7                                  
021734,000251: 
021735,000252: 16,2766           04065        ENDTST03           TC       BANKCALL                              
021736,000253: 16,2767           30745                           CADR     ENDTEST                               
021737,000254: 
021738,000255: 
021739,000256: 
021740,000257: 
021741,000258: 
021742,000259: 16,2770           03013        ERCTRANG           OCT      03013                                 
021743,000260: 16,2771           02660                           OCT      02660                                 
021744,000261: 16,2772           01042                           OCT      01042                                 
021745,000262: 
021746,000263: 
021747,000264: 16,2773           00000                           OCT      00000                                 
021748,000265: 16,2774           76736                           OCT      76736                                 
021749,000266: 16,2775           75120                           OCT      75120                                 
021750,000267: 16,2776           74765                           OCT      74765                                 
021751,000268: 
021752,000269: 
021753,000270: 
021754,000271: 
021755,000272: 
021756,000273: 16,2777           01463        RADECNTR           OCT      01463                                 
021757,000274: 16,3000           01042                           OCT      01042                                 
021758,000275: 16,3001           00000                           OCT      00000                                 
021759,000276: 16,3002           76736                           OCT      76736                                 
021760,000277: 16,3003           76315                           OCT      76315                                 
021761,000278: 
021762,000279: 
021763,000280: 
021764,000281: 
021765,000282: 
021766,000283: 16,3004           00000        RRRATFPS           OCT      00000                                 
021767,000284: 16,3005           00001                           OCT      00001                                 
021768,000285: 16,3006           00002                           OCT      00002                                 
021769,000286: 16,3007           00004                           OCT      00004                                 
021770,000287: 16,3010           00010                           OCT      00010                                 
021771,000288: 16,3011           00020                           OCT      00020                                 
021772,000289: 16,3012           00040                           OCT      00040                                 
021773,000290: 16,3013           00100                           OCT      00100                                 
021774,000291: 16,3014           00200                           OCT      00200                                 
021775,000292: 16,3015           00237                           OCT      00237                                 
021776,000293: 16,3016           00400                           OCT      00400                                 
021777,000294: 16,3017           00545                           OCT      00545                                 
021778,000295: 16,3020           00544                           OCT      00544                                 
021779,000296: 16,3021           77540                           OCT      77540                                 
021780,000297: 16,3022           77232                           OCT      77232                                 
021781,000298: 
021782,000299: 
021783,000300: 16,3023           00006        CDURATE            EXTEND                                         
021784,000301: 16,3024           23546                           QXCH     QPLACE                                
021785,000302: 
021786,000303: 16,3025           55577                           TS       CDULIMIT                              
021787,000304: 
021788,000305: 16,3026           10067                           CCS      NEWJOB                                
021789,000306: 16,3027           04365                           TC       CHANG1                                
021790,000307: 
021791,000308: 16,3030           41577                           CS       CDULIMIT                              
021792,000309: 16,3031           51672                           INDEX    CDUNDX                                
021793,000310: 16,3032           60032                           AD       CDUX                                  #  CATCH FIRST PULSE
021794,000311: 16,3033           00006                           EXTEND                                         
021795,000312: 16,3034           63026                           BZMF     CDURATE    +3                         #  LOOK AGAIN
021796,000313: 
021797,000314: 16,3035           51672                           INDEX    CDUNDX                                
021798,000315: 16,3036           30032                           CAE      CDUX                                  
021799,000316: 16,3037           57575                           XCH      CDUREADF                              #  CDU FINAL READING
021800,000317: 16,3040           57576                           XCH      CDUREADI                              #  CDU INITIAL READING
021801,000318: 
021802,000319: 16,3041           05462                           TC       FINETIME                              
021803,000320: 16,3042           53573                           DXCH     CDUTIMEF                              #  DP FINAL TIME
021804,000321: 16,3043           53571                           DXCH     CDUTIMEI                              #  DP INITIAL READING
021805,000322: 
021806,000323: 16,3044           00003                           RELINT                                         
021807,000324: 16,3045           01546                           TC       QPLACE                                
021808,000325: 
021809,000326: 
021810,000327: 
021811,000328: 
021812,000329: 16,3046           00006        CALCRATE           EXTEND                                         
021813,000330: 16,3047           23546                           QXCH     QPLACE                                
021814,000331: 
021815,000332: 16,3050           53576                           DXCH     CDUREADF                              
021816,000333: 16,3051           00006                           EXTEND                                         
021817,000334: 16,3052           20001                           MSU      L                                     
021818,000335: 16,3053           55677                           TS       CDUANG                                
021819,000336: 
021820,000337: 16,3054           06000                           TC       INTPRET                               
021821,000338: 16,3055           45345                           DLOAD    DSU                                   
021822,000339: 16,3056           01573                                    CDUTIMEF                              
021823,000340: 16,3057           01571                                    CDUTIMEI                              
021824,000341: 16,3060           67206                           PUSH     SLOAD                                 
021825,000342: 16,3061           01700                                    CDUANG                                
021826,000343: 16,3062           56261                           SR       DDV                                   
021827,000344: 16,3063           00617                                    14D                                   
021828,000345: 16,3064           45005                           DMP      RTB                                   
021829,000346: 16,3065           35361                                    DEG/SEC                               
021830,000347: 16,3066           33406                                    SGNAGREE                              
021831,000348: 16,3067           00337                           STORE    DSPTEM2                               
021832,000349: 
021833,000350: 16,3070           77776                           EXIT                                           
021834,000351: 
021835,000352: 16,3071           33353        RATEDSP            CAF      V06N66X                               
021836,000353: 16,3072           05324                           TC       NVSBWAIT                              
021837,000354: 16,3073           05266                           TC       FLASHON                               
021838,000355: 16,3074           05132                           TC       ENDIDLE                               
021839,000356: 16,3075           12766                           TCF      ENDTST03                              
021840,000357: 16,3076           13100                           TCF      +2                                    
021841,000358: 16,3077           13071                           TCF      RATEDSP                               
021842,000359: 
021843,000360: 16,3100           25550                           INCR     RUN                                   
021844,000361: 16,3101           01546                           TC       QPLACE                                
021845,000362: 
021846,000363: 
021847,000364: 16,3102           54400        THETADLD           TS       THETAD                                
021848,000365: 16,3103           54401                           TS       THETAD     +1                         
021849,000366: 16,3104           54402                           TS       THETAD     +2                         
021850,000367: 
021851,000368: 16,3105           00006                           EXTEND                                         
021852,000369: 16,3106           23546                           QXCH     QPLACE                                
021853,000370: 
021854,000371: 16,3107           37663                           CAF      SEVEN                                 
021855,000372: 16,3110           55551        THLD1              TS       STOREPL                               
021856,000373: 
021857,000374: 16,3111           04065                           TC       BANKCALL                              
021858,000375: 16,3112           26055                           CADR     IMUCOARS                              
021859,000376: 16,3113           04065                           TC       BANKCALL                              
021860,000377: 16,3114           26716                           CADR     IMUSTALL                              
021861,000378: 16,3115           12766                           TCF      ENDTST03                              
021862,000379: 
021863,000380: 16,3116           11551                           CCS      STOREPL                               
021864,000381: 16,3117           03110                           TC       THLD1                                 
021865,000382: 
021866,000383: 16,3120           03174                           TC       OPRTRDLY                              
021867,000384: 
021868,000385: 16,3121           01546                           TC       QPLACE                                
021869,000386: 
021870,000387: 
021871,000388: 
021872,000389: 
021873,000390: 16,3122           00006        FINEALGN           EXTEND                                         
021874,000391: 16,3123           23546                           QXCH     QPLACE                                
021875,000392: 
021876,000393: 16,3124           04065                           TC       BANKCALL                              
021877,000394: 16,3125           26227                           CADR     IMUFINE                               
021878,000395: 16,3126           04065                           TC       BANKCALL                              
021879,000396: 16,3127           26716                           CADR     IMUSTALL                              
021880,000397: 16,3130           12766                           TCF      ENDTST03                              
021881,000398: 
021882,000399: 16,3131           01546                           TC       QPLACE                                
021883,000400: 
021884,000401: 
021885,000402: 16,3132           00006        CH30DSPY           EXTEND                                         
021886,000403: 16,3133           23546                           QXCH     QPLACE                                
021887,000404: 
021888,000405: 16,3134           33344                           CAF      OCT30                                 
021889,000406: 16,3135           54142                           TS       MPAC       +2                         
021890,000407: 16,3136           33347                           CAF      V01N10X                               
021891,000408: 16,3137           05324                           TC       NVSBWAIT                              
021892,000409: 16,3140           05266                           TC       FLASHON                               
021893,000410: 16,3141           05132                           TC       ENDIDLE                               
021894,000411: 16,3142           12766                           TCF      ENDTST03                              
021895,000412: 16,3143           13145                           TCF      +2                                    
021896,000413: 16,3144           13134                           TCF      CH30DSPY   +2                         
021897,000414: 
021898,000415: 16,3145           05272                           TC       FLASHOFF                              
021899,000416: 16,3146           25550                           INCR     RUN                                   
021900,000417: 16,3147           01546                           TC       QPLACE                                
021901,000418: 
021902,000419: 
021903,000420: 
021904,000421: 
021905,000422: 16,3150           00006        ZEROMODE           EXTEND                                         
021906,000423: 16,3151           23546                           QXCH     QPLACE                                
021907,000424: 
021908,000425: 16,3152           04065                           TC       BANKCALL                              
021909,000426: 16,3153           26000                           CADR     IMUZERO                               
021910,000427: 16,3154           04065                           TC       BANKCALL                              
021911,000428: 16,3155           26716                           CADR     IMUSTALL                              
021912,000429: 16,3156           12766                           TCF      ENDTST03                              
021913,000430: 
021914,000431: 16,3157           01546                           TC       QPLACE                                
021915,000432: 
021916,000433: 
021917,000434: 
021918,000435: 
021919,000436: 16,3160           43346        ZEROMAIN           CS       4+6BITS                               
021920,000437: 16,3161           00006                           EXTEND                                         
021921,000438: 16,3162           03012                           WAND     12                                    
021922,000439: 
021923,000440: 16,3163           37653                           CAF      BIT5                                  
021924,000441: 16,3164           00006                           EXTEND                                         
021925,000442: 16,3165           05012                           WOR      12                                    
021926,000443: 
021927,000444: 16,3166           00002                           TC       Q                                     
021928,000445: 
021929,000446: 
021930,000447: 16,3167           00006        RROPRDLY           EXTEND                                         
021931,000448: 16,3170           23545                           QXCH     QPLAC                                 
021932,000449: 
021933,000450: 16,3171           25550                           INCR     RUN                                   
021934,000451: 
021935,000452: 16,3172           33352                           CAF      V06N40X                               
021936,000453: 16,3173           13200                           TCF      OPRTRDLY   +4                         
021937,000454: 
021938,000455: 
021939,000456: 
021940,000457: 
021941,000458: 16,3174           00006        OPRTRDLY           EXTEND                                         
021942,000459: 16,3175           23545                           QXCH     QPLAC                                 
021943,000460: 
021944,000461: 16,3176           25550                           INCR     RUN                                   
021945,000462: 16,3177           33351                           CAF      V06N20X                               
021946,000463: 16,3200           05324                           TC       NVSBWAIT                              
021947,000464: 16,3201           33354                           CAF      V33N00X                               
021948,000465: 16,3202           05324                           TC       NVSBWAIT                              
021949,000466: 16,3203           31550                           CA       RUN                                   
021950,000467: 16,3204           73343                           MASK     6LOW                                  
021951,000468: 16,3205           05324                           TC       NVSBWAIT                              
021952,000469: 16,3206           05266                           TC       FLASHON                               
021953,000470: 16,3207           05132                           TC       ENDIDLE                               
021954,000471: 16,3210           12766                           TCF      ENDTST03                              
021955,000472: 16,3211           13213                           TCF      +2                                    
021956,000473: 16,3212           13177                           TCF      OPRTRDLY   +3                         
021957,000474: 
021958,000475: 16,3213           05272                           TC       FLASHOFF                              
021959,000476: 16,3214           01545                           TC       QPLAC                                 
021960,000477: 
021961,000478: 16,3215           00006        FINEZERO           EXTEND                                         
021962,000479: 16,3216           23545                           QXCH     QPLAC                                 
021963,000480: 
021964,000481: 16,3217           04065                           TC       BANKCALL                              
021965,000482: 16,3220           26000                           CADR     IMUZERO                               
021966,000483: 
021967,000484: 16,3221           37656                           CAF      TWO                                   
021968,000485: 16,3222           55512                           TS       EROPTN                                
021969,000486: 16,3223           37655                           CAF      FOUR                                  
021970,000487: 16,3224           55544                           TS       POSITON                               
021971,000488: 
021972,000489: 16,3225           00004                           INHINT                                         
021973,000490: 16,3226           47646                           CS       BIT10                                 
021974,000491: 16,3227           70061                           MASK     STATE                                 
021975,000492: 16,3230           67646                           AD       BIT10                                 
021976,000493: 16,3231           54061                           TS       STATE                                 
021977,000494: 16,3232           00003                           RELINT                                         
021978,000495: 
021979,000496:                                                                                                  #  Page 0511
021980,000497: 
021981,000498: 16,3233           04065                           TC       BANKCALL                              
021982,000499: 16,3234           30760                           CADR     LEMLAB                                
021983,000500: 
021984,000501: 16,3235           05311        SAMODRTN           TC       GRABWAIT                              
021985,000502: 
021986,000503: 16,3236           33351                           CAF      V06N20X                               
021987,000504: 16,3237           05324                           TC       NVSBWAIT                              
021988,000505: 
021989,000506: 16,3240           03160                           TC       ZEROMAIN                              
021990,000507: 
021991,000508: 16,3241           03132                           TC       CH30DSPY                              
021992,000509: 16,3242           03150                           TC       ZEROMODE                              
021993,000510: 
021994,000511: 16,3243           01545                           TC       QPLAC                                 
021995,000512: 
021996,000513: 
021997,000514: 
021998,000515: 16,3244           37665        COARZERO           CAF      ZERO                                  
021999,000516: 16,3245           54400                           TS       THETAD                                
022000,000517: 16,3246           54401                           TS       THETAD     +1                         
022001,000518: 16,3247           54402                           TS       THETAD     +2                         
022002,000519: 
022003,000520: 16,3250           00006                           EXTEND                                         
022004,000521: 16,3251           23546                           QXCH     QPLACE                                
022005,000522: 
022006,000523: 16,3252           04065                           TC       BANKCALL                              
022007,000524: 16,3253           26055                           CADR     IMUCOARS                              
022008,000525: 16,3254           04065                           TC       BANKCALL                              
022009,000526: 16,3255           26716                           CADR     IMUSTALL                              
022010,000527: 16,3256           12766                           TCF      ENDTST03                              
022011,000528: 
022012,000529: 16,3257           01546                           TC       QPLACE                                
022013,000530: 
022014,000531: 
022015,000532: 16,3260           00006        FNZEROFN           EXTEND                                         
022016,000533: 16,3261           23545                           QXCH     QPLAC                                 
022017,000534: 
022018,000535: 16,3262           03122                           TC       FINEALGN                              
022019,000536: 
022020,000537: 16,3263           30032                           CAE      CDUX                                  
022021,000538: 16,3264           55575                           TS       CDUREADF                              
022022,000539: 16,3265           30033                           CAE      CDUY                                  
022023,000540: 16,3266           55576                           TS       CDUREADI                              
022024,000541: 16,3267           30034                           CAE      CDUZ                                  
022025,000542: 16,3270           55577                           TS       CDULIMIT                              
022026,000543: 
022027,000544: 16,3271           03150                           TC       ZEROMODE                              
022028,000545: 
022029,000546: 16,3272           33345                           CAF      3SEC                                  
022030,000547: 16,3273           04517                           TC       WAITLIST                              
022031,000548: 16,3274           03300 34005                     2CADR    FZF1                                  
022032,000549: 
022033,000550: 16,3276           33356                           CAF      FZF2CADR                              
022034,000551: 16,3277           04377                           TC       JOBSLEEP                              
022035,000552: 
022036,000553: 16,3300           33356        FZF1               CAF      FZF2CADR                              
022037,000554: 16,3301           04403                           TC       JOBWAKE                               
022038,000555: 16,3302           04563                           TC       TASKOVER                              
022039,000556: 
022040,000557: 16,3303           31575        FZF2               CAE      CDUREADF                              
022041,000558: 16,3304           00006                           EXTEND                                         
022042,000559: 16,3305           20032                           MSU      CDUX                                  
022043,000560: 16,3306           54333                           TS       DSPTEM1                               
022044,000561: 
022045,000562: 16,3307           31576                           CAE      CDUREADI                              
022046,000563: 16,3310           00006                           EXTEND                                         
022047,000564: 16,3311           20033                           MSU      CDUY                                  
022048,000565: 16,3312           54334                           TS       DSPTEM1    +1                         
022049,000566: 
022050,000567: 16,3313           31577                           CAE      CDULIMIT                              
022051,000568: 16,3314           00006                           EXTEND                                         
022052,000569: 16,3315           20034                           MSU      CDUZ                                  
022053,000570: 16,3316           54335                           TS       DSPTEM1    +2                         
022054,000571: 
022055,000572: 16,3317           33350        FZFDSP             CAF      V05N30X                               
022056,000573: 16,3320           05324                           TC       NVSBWAIT                              
022057,000574: 16,3321           05266                           TC       FLASHON                               
022058,000575: 16,3322           05132                           TC       ENDIDLE                               
022059,000576: 16,3323           12766                           TCF      ENDTST03                              
022060,000577: 16,3324           13326                           TCF      +2                                    
022061,000578: 16,3325           13317                           TCF      FZFDSP                                
022062,000579: 
022063,000580: 16,3326           25550                           INCR     RUN                                   
022064,000581: 16,3327           01545                           TC       QPLAC                                 
022065,000582: 
022066,000583: 
022067,000584: 16,3330           00133        1ANG               OCT      00133                                 
022068,000585: 16,3331           06000        33.75ANG           OCT      06000                                 
022069,000586: 16,3332           10000        45ANG              OCT      10000                                 
022070,000587: 16,3333           14477        71ANG              OCT      14477                                 
022071,000588: 16,3334           20000        90ANG              OCT      20000                                 
022072,000589: 16,3335           30000        135ANG             OCT      30000                                 
022073,000590: 16,3336           01616        10ANG              OCT      01616                                 
022074,000591: 16,3337           34344        160ANG             OCT      34344                                 
022075,000592: 16,3340           40000        180ANG             OCT      40000                                 
022076,000593: 16,3341           50000        225ANG             OCT      50000                                 
022077,000594: 16,3342           36162        170ANG             OCT      36162                                 
022078,000595: 
022079,000596: 16,3343           00077        6LOW               OCT      77                                    
022080,000597: 16,3344           00030        OCT30              OCT      30                                    
022081,000598: 16,3345           00454        3SEC               DEC      300        B-14                       
022082,000599: 16,3346           00050        4+6BITS            OCT      00050                                 
022083,000600: 
022084,000601: 16,3347           00110        V01N10X            OCT      00110                                 
022085,000602: 16,3350           00530        V05N30X            OCT      00530                                 
022086,000603: 16,3351           00620        V06N20X            OCT      00620                                 
022087,000604: 16,3352           00640        V06N40X            OCT      00640                                 
022088,000605: 16,3353           00666        V06N66X            OCT      00666                                 
022089,000606: 16,3354           03300        V33N00X            OCT      03300                                 
022090,000607: 
022091,000608: 16,3355           34666        ECE2CADR           CADR     ECE2                                  
022092,000609: 16,3356           35303        FZF2CADR           CADR     FZF2                                  
022093,000610: 16,3357           02500        OGCECADR           ECADR    OGC                                   
022094,000611: 
022095,000612: 16,3360           00043 05000  DEG/SEC            2DEC     576000     B-28                       
022096,000613: 
022097,000614: 
022098,000615: 
022099,000616: 16,3362                        ENDIMUS3           EQUALS                                         
022100,000617: 
022101,000618: 
022102,000619: 
022103,000620: 
022104,000621: 
022105,000622: 
022106,000623: 
022107,000624: 
022108,000625: 
022109,000626: 
022110,000627: 
022111,000628: 

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