                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 415/419 ------           
       01416 -0 53400 4 02346        LXD CTRAST,4                CUR TIFG0 LEV N0 N0T F0UND IN TRAST0 F3B08080    
       01417  1 77774 2 01420        TXI M22645,2,-4             UPDATE TRAST0 ENTRY P0INT            F3B08090    
       01420  0 07400 4 01456 M22645 TSX M22700,4                TRAST0 FMLA N0 SEARCH                F3B08100    
       01421  0 07400 4 02147        TSX M23070,4                TIFG0 FMLA N0 N0T AGAIN F0UND        F3B08110    
       01422  0 02000 0 01414        TRA M22640                  TIFG0 FMLA N0 AGAIN F0UND            F3B08120    
       01423  0 50000 0 02356 M22650 CLA ETRAST                  RESET CTRAST CELL FOR                F3B08130    
       01424  0 60100 0 02346        STO CTRAST                  TRAST0 LEV N0 SEARCH                 F3B08140    
       01425 -0 53400 2 02347        LXD ETRAL,2                                                      F3B08150    
       01426  1 77777 2 01427        TXI M22655,2,-1             UPDATE TRALEV                        F3B08160    
       01427 -0 63400 2 02347 M22655 SXD ETRAL,2                 ENTRY P0INT                          F3B08170    
       01430  0 50000 0 02333        CLA ADDCO                   SET ADDC0 FOR                        F3B08180    
       01431  0 40000 0 02301        ADD M2CON+5                 TRA ADDRESS                          F3B08190    
       01432  0 60100 0 02333        STO ADDCO                                                        F3B08200    
       01433  0 07400 4 01477 M22660 TSX M22750,4                TRASTQ LEV N0 SEARCH                 F3B08210    
       01434  0 07400 4 02013        TSX M23000,4                CUR TIFG0 LEV N0 F0UND IN TRAST0     F3B08220    
       01435 -0 53400 2 02346        LXD CTRAST,2                CUR TIFG0 LEV N0 NQT F0UND IN TRAST0 F3808230    
       01436  1 77774 2 01437        TXI M22663,2,-4             UPDATE TRAST0 ENTRY P0INT            F3B08240    
       01437  0 07400 4 01456 M22663 TSX M22700,4                TRAST0 FMLA N0 SEARCH                F3B08250    
       01440  0 07400 4 02077        TSX M23050,4                TIFG0 FMLA N0 N0T AGAIN F0UND        F3B08260    
       01441  0 02000 0 01433        TRA M22660                  TIF0 FMLA N0 AGAIN F0UND             F3B08270    
       01442 -0 53400 2 02347        LXD ETRAL,2                                                      F3B08280    
       01443  1 77777 2 01444        TXI M22670,2,-1             UPDATE TRALEV ENTRY P0INT            F3B08290    
       01444 -0 63400 2 02347 M22670 SXD ETRAL,2                 FOR NEXT TIFG0 ENTRY                 F3B08300    
       01445  0 50000 0 02333        CLA ADDCO                                                        F3B08310    
       01446  0 40200 0 02301        SUB M2CON+5                                                      F3B08320    
       01447  0 10000 0 00535 COR13  TZE M21030-1                                                     F3B08330    
       01450  1 00003 2 01451        TXI M22675,2,3              RESET ETRAL FOR                      F3B08340    
       01451 -0 63400 2 02347 M22675 SXD ETRAL,2                 SEC0ND PASS THR0UGH TRAST0           F3B08350    
       01452  0 50000 0 02356        CLA ETRAST                  RESET CTRAST FOR SEC0ND              F3B08360    
       01453  0 60100 0 02346        STO CTRAST                  PASS THR0UGH TRAST0                  F3B08370    
       01454  0 50000 0 02302        CLA M2CON+6                 INITIALIZE LQCATION                  F3B08380    
       01455  1 77777 1 01305        TXI M22435-2,1,-1                                                F3B08390    
                                         M2 CL0SED SUBRQUTINES                                        F3B08400    
                                         TRAST0 FMLA N0 SEARCH                                        F3B08410    
       01456 -0 75400 2 00000 M22700 PXD 0,2             PLACE CG0NT 0F TRALEV ENTRY IN AC.           F3B08420    
       01457  0 40200 0 02367        SUB TRASTO-1        TRAST0 WORD COUNT                            F3B08430    
       01460  0 10000 4 00001        TZE 1,4             EQUAL. TR BACK                               F3B08440    
       01461  0 50000 2 02370        CLA TRASTO,2        TRAST0 ENTRY                                 F3B08450    
       01462 -0 32000 0 02306        ANA M2CON+10        SAVE DECREMENT                               F3B08460    
       01463  0 76700 0 00022        ALS 18              SHIFT B T0 DECREMENT P0RTION                 F3B08470    
       01464  0 34000 0 02345        CAS TIFFN           CURRENT TIFGQ FHLA. N0.                      F3B08480    
       01465  0 02000 0 01470        TRA M22710          TRAST0 GREATER THAN T1FG0                    F3B08490    
       01466  0 02000 0 01475        TRA M22715          TRAST0 EQUAL T0 TIFGQ FHLA N0                F3B08500    
       01467  1 77774 2 01456        TXI M22700,2,-4     TRAS T0 LESS THAN TIFG0, BACK T0 BRING NEXT  F3B08510    
       01470  0 50000 2 02370 M22710 CLA TRASTO,2        TRAST0 ENTRY                                 F3B08520    
       01471 -0 32000 0 02305        ANA M2CON+9         HASK OUT ADDRESS                             F3B08530    
       01472  0 34000 0 02345        CAS TIFFN           INTERNAL FORMULA N0. ALPHA                   F3B08540    
       01473  1 77774 2 01456        TXI M22700,2,-4     TRAST0                                       F3B08550    
       01474  1 77774 2 01456        TXI M22700,2,-4                                                  F3B08560    
       01475 -0 63400 2 02346 M22715 SXD CTRAST,2                                                     F3B08570    
       01476  0 02000 4 00002        TRA 2,4             TRAST0 NQT F0UND                             F3B08580    
                                         TRAST0 LEVEL N0 SEARCH                                       F3B08590    
       01477 -0 63400 4 02331 M22750 SXD CBOX,4          TR COUNT STORED FOR L)NKAGE                  F3B08600    
       01500 -0 53400 2 02347        LXD ETRAL,2         CURRENT TRALEV ENTRY PT. IN IR 2             F3B08610    
