                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 411/415 ------           
       01073  0 76000 0 00002        CHS                 MAKE L0CATION WORD PQSITIVE                  F3B05920    
       01074  0 60100 0 02362 PAT5   STO M2CW                                                         F3B05930    
       01075  0 50000 0 02301 PAT6   CLA M2CON+5         +10                                          F3B05940    
       01076  0 60100 0 02360 PAT7   STO CLOC            SAVE INCREHENT                               F3B05930    
       01077  0 07400 4 01477 M22105 TSX M22750,4        TRAST0 LEV N0 SEARCH                         F3B05960    
       01100  0 07400 4 01560        TSX M22800,4        CUR TIFG0 LEV N0.IN TRAST0                   F3B05970    
       01101 -0 53400 2 02346        LXD CTRAST,2        CUR TIFGQ LEV N0 N0T IN TRASTQ               F3B05980    
       01102  1 77774 2 01103 M22110 TXI M22110+1,2,-4   UPDATE TRAST0 ENTRY P0INT                    F3B05990    
       01103  0 07400 4 01456        TSX M22700,4        TRAST0 FHLA N0 SEARCH                        F3B06000    
       01104  0 02000 0 01112        TRA M22120          TIFG0 FMLA N0.N0T AGA)N FQUND                F3B06010    
       01105  0 50000 0 02333        CLA ADDCO           TIFG0 FHLA N0.AGAIN F0UND                    F3B06020    
       01106  0 10000 0 01077        TZE M22105          TIFG0 ENTRY N0T YET F0UND IN TRAST0          F3B06030    
       01107  0 50000 0 02274        CLA M2CON           T1FG0 ENTRY ALREADY F0UND IN TRAST0          F3B06040    
       01110  0 60100 0 02362        STO M2CW            ADJUST L0CATION WR0D T0 ZER0                 F3B06030    
       01111  0 02000 0 01077        TRA M22105          BACK T0 LEVEL NQ. SEARCH                     F3806060    
       01112 -0 53400 2 02347 M22120 LXD ETRAL,2         UPDATE TRALEV ENTRY P0INT                    F3B06070    
       01113  0 50000 2 03211        CLA TRALEV,2        BEGINNING 0F TRALEV BLOCK                    F3B06080    
       01114 -0 12000 0 01121        TMI M22130                                                       F3B06090    
       01115 -0 75400 2 00000        PXD 0,2             TEST IF END 0F TRALEV                        F3B06100    
       01116  0 40200 0 03210        SUB TRALEV-1                                                     F3B06110    
       01117  0 10000 0 01121        TZE M22130                                                       F3B06120    
       01120  1 77777 2 01113        TXI M22120+1,2,-1   SPACE QVER T0 NEXT ENTRY                     F3806130    
       01121 -0 63400 2 02347 M22130 SXD ETRAL,2                                                      F3B06140    
       01122  1 77777 1 00503        TXI M21000,1,-1                                                  F3B061S0    
                                         TIFG0 ENTRY A GO TO (A),1                                    F3B06160    
       01123  0 50000 1 05472 M22200 CLA TIFGO,1         COMPUTE N+1 (CTRAD1- CTRAD2+1)               F3806170    
       01124  0 73400 2 00000        PAX 0,2             STORE IN H2CW43                              F3B06180    
       01125 -0 63400 2 02332        SXD L0X,2           STORE COMPILING FIRST                        F3B06100    
       01126 -0 32000 0 02305        ANA M2CON+9         INSTRUCTION                                  F3806200    
       01127  0 40000 0 02303        ADD M2CON+7                                                      F3B06210    
       01130  0 40200 0 02332        SUB L0X                                                          F3806220    
       01131  0 60100 0 02365        STO M2CW+3                                                       F3806230    
       01132  0 76000 0 00006        COM                 COMPUTE 2S COMP 0F                           F3B06240    
       01133  0 40000 0 02304        ADD M2CON+8         N-1 IN ORDER T0                              F3806230    
       01134  0 62200 0 01140        STD M22220          08TAIN TRALEV ENTRY                          F3B06260    
       01135 -0 53400 2 02347        LXD ETRAL,2         PGIN7 FQR LAST ADDRESS                       F3B06270    
       01136 -0 63400 2 01165        SXD M22240+1,2                                                   F3B06280    
       01137 -0 63400 2 01231        SXD M22275+1,2                                                   F3806290    
 D     01140  1 00000 2 01141 M22220 TXI M22220+1,2                                                   F3806300    
       01141 -0 63400 2 02357        SXD NETRAL,2        TRALEV. ENTRY PT. FOR LAST ADDRESS           F3B06310    
       01142 -0 63400 2 02347        SXD ETRAL,2         CURRENT TRALEV ENTRY PT.                     F3806320    
       01143  0 07400 4 02177        TSX CIT200,4        COMPILE FIRST INSTRUCTION                    F3B06330    
       01144  0 00000 0 02345        HTR TIFFN           ALPHA                                        F3806340    
       01145  0 00000 0 02274        HTR M2CON           ZER0                                         F3B06350    
       01146  0 00000 0 02345        HTR TIFFN           ALPHA                                        F3B06360    
       01147  0 00000 0 02365        HTR M2CW+3          N0. QF ADDRESS IN TRAD                       F3B06370    
       01150  0 07400 4 01477 M22225 TSX M22750,4        TRAST0 LEVEL N0 SEARCH                       F3B06380    
       01151  0 07400 4 02013        TSX M23000,4        C0R TIFG0 LEV N0 IN TRAST0                   F3B06390    
       01152 -0 53400 2 02346        LXD CTRAST,2        CUR TIFG0 LEV N0 NQT IN TRAST0               F3806400    
       01153  1 77774 2 01154 M22230 TXI M22230+1,2,-4   UPDATE TRASTD ENTRY P0INT                    F3B06410    
       01154  0 07400 4 01456        TSX M22700,4        TRAST0 FHLA N0.SEARCH                        F3B06420    
       01155  0 07400 4 02077        TSX M23050,4        TIFG0 FHLA N0.N0T AGAIN F0UND                F3B06430    
       01156  0 02000 0 01150        TRA M22225          TIFG0 FHLA N0 AGAIN F0UND                    F3B06440    
       01157  0 50000 0 02356 M22233 CLA ETRAST          RESET CTRAST CELL FOR                        F3B06430    
