                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 363/367 ------           
       07067  0 53400 1 05127        LXA L(2),1                                                       F2527530    
       07070  0 50000 0 07374        CLA LXCI6                                                        F2527540    
       07071  0 07400 4 07271        TSX LXC,4                                                        F2527550    
       07072  0 02000 0 07113        TRA PC60                                                         F2527560    
       07073  0 50000 0 07612 PC40   CLA OR000+20          POS, IS S2,                                F2527570    
       07074  0 07400 4 04601        TSX FIXC0N,4          COMPILE INSTRUCTIONS                       F2527580    
       07075  0 60100 0 07612        STO OR000+20          T0 COMPUT N3X-1 AND                        F2527590    
       07076  0 53400 1 05134        LXA L(10),1           GO TO PC60.                                F2527600    
       07077  0 50000 0 07403        CLA LX2CI                                                        F2527610    
       07100  0 07400 4 07271        TSX LXC,4                                                        F2527620    
       07101  0 02000 0 07113        TRA PC60                                                         F2527630    
       07102  0 76500 0 00043 PC50   LRS 35                X IS C0NSTANT,                             F2527640    
       07103  0 20000 0 07612        MPY OR000+20          FORM GN3X-1 FOR                            F2527650    
       07104  0 76700 0 00021        ALS 17                XX POS. AND COMPILE                        F2527660    
       07105  0 40200 0 05061        SUB L1DEC                                                        F2527670    
       07106  0 07400 4 04601        TSX FIXC0N,4                                                     F2527680    
       07107  0 60100 0 07612        STO OR000+20                                                     F2527690    
       07110  0 53400 1 05126        LXA L(1),1                                                       F2527700    
       07111  0 50000 0 07401        CLA XK                                                           F2527710    
       07112  0 07400 4 07271        TSX LXC,4                                                        F2527720    
       07113 -0 53400 1 05212 PC60   LXD N3X,1                                                        F2527730    
       07114  0 50000 1 03652        CLA TAG2+3,1          )S                                         F2527740    
       07115 -0 73400 2 00000        PDX 0,2               N3                                         F2527750    
       07116  0 53400 1 05131        LXA L(3),1            OF                                         F2527760    
       07117  0 50000 2 01076        CLA DOTAGZ,2          CURRENT                                    F2527770    
       07120  0 77100 0 00017        ARS 15                DO                                         F2527780    
       07121  0 76000 0 00001        LBT                   VARIABLE.                                  F2527790    
       07122  0 02000 0 07127        TRA PC61              C0NSTANT, PC61.                            F2527800    
       07123  0 50000 0 07405        CLA LXCI8             VARIABLE, COMPILE                          F2527810    
       07124  0 07400 4 07271 PC62   TSX LXC,4             STD, ADD N3G, STD.                         F2527820    
       07125 -0 53400 4 06717        LXD PC04,4                                                       F2527830    
       07126  0 02000 4 00001        TRA 1,4                                                          F2527840    
       07127  0 50000 0 07562 PC61   CLA LXCI8P            C0NSTANT. COMPILE                          F2527850    
       07130  0 02000 0 07124        TRA PC62              ST0, ADD C(OR0+12), STD.                   F2527860    
                                         ********************,****************************************F2527870    
                                         CIL03I FILLS OUT L0CATION AND TAG NAHE WORDS FOR COMPILED INSF2527880    
                                         TRUCTIONS WITHOUT L0CATIONS.                                 F2527890    
       07131  0 50000 0 05133 CIL03I CLA L(0)              PLACE 0 IN L0CATION                        F2527900    
       07132  0 60100 0 05176        STO CIL00             WORD AND TAG IN                            F2527910    
       07133  0 50000 0 03652        CLA TAG3              TAG WORD OF COMPILE0                       F2527920    
       07134 -0 32000 0 05141        ANA ADMSK             INSTRUCGIN.                                F2527930    
       07135  0 60100 0 05201        STO CIL03                                                        F2527940    
       07136  0 02000 4 00001        TRA 1,4                                                          F2527950    
                                         *************************************************************F2527960    
                                         BITP CHECKS SUBSCRIPTS FOR DEFINITION.  IF DEFINED BY RELC0N F2327970    
                                         0R DOSUB IT 0BTAINS 0BJECT PROGRAM SYMBOLS FOR N1 0R S1 RESPEF2327980    
                                         CTIVELY.                                                     F2527990    
       07137  0 62100 0 07162 BITP   STA BITP14                                                       F2528000    
       07140  0 62100 0 07147        STA BITP02            INITIALIZE SHIFTS,                         F2528010    
       07141  0 62100 0 07153        STA BITP04            STORE LINKAGE                              F2528020    
       07142  0 73400 2 00000        PAX 0,2               AND PLACE 0,1,2 IN                         F2528030    
       07143  0 76700 0 00001        ALS 1                 XB FOR S3, S2, AND                         F2528040    
       07144  0 73400 1 00000        PAX 0,1               S1 RESPECTIVELY,                           F2528050    
       07145 -0 63400 4 07166        SXD BITP25,4                                                     F2528060    
