                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 429/433 ------           
       00254 -0 76000 0 00141        MSE 97                  IS FIRST FILE USED UP                    F3B01610    
       00255  0 02000 0 00257        TRA F1                  N0                                       F3B01620    
       00256  0 02000 0 00312        TRA H1                  YES                                      F3B01630    
       00257  0 50000 1 02362  F1    CLA FFLBUF,A            D0ES NEXT INSTRUCTION IN                 F3B01640    
       00260  0 10000 0 00234        TZE E1                  FIRST FILE HAVE ZERO LOC WORD            F3B01650    
       00261  0 07400 4 00724        TSX M31000,C        TSX COM TABLE SEARCH                         F3B01660    
       00262  0 50000 1 02362  F2    CLA FFLBUF,A        TEST KF PRESENT ALPHA IS                     F3B01670    
       00263 -0 32000 0 01162        ANA MASK            GREATER THAN ALPHA OF                        F3B01680    
       00264  0 34000 0 01221        CAS FFLCFN          PREVI0US CIT                                 F3B01690    
       00265  0 02000 0 00104        TRA C6              NEXT INTERNAL FORMULA N0.                    F3B01700    
       00266  0 76100 0 00000        NOP                                                              F3B01710    
       00267  0 53400 4 01145        LXA L(4),C                                                       F3B01720    
       00270  0 50000 1 02362  F3    CLA FFLBUF,A        PREPARE T0 COMPILE THIS INSTRUCTION          F3B01730    
       00271  0 60100 4 01226        STO FFLCOM+4,C      SET UP F0UR WORDS                            F3B01740    
       00272  1 77777 1 00273        TXI F4,A,-1                                                      F3B01750    
       00273  2 00001 4 00270  F4    TIX F3,C,1                                                       F3B01760    
       00274  0 07400 4 01022        TSX CIT00,C         COMPILER                                     F3B01770    
       00275  0 00000 0 01222        HTR FFLCOM                                                       F3B01780    
       00276  0 00000 0 01223        HTR FFLCOM+1                                                     F3B01790    
       00277  0 00000 0 01224        HTR FFLCOM+2                                                     F3B01800    
       00300  0 00000 0 01225        HTR FFLCOM+3                                                     F3B01810    
       00301 -0 75400 1 00000        PXD 0,A             COUNT OF P0SITION 0H FIRST FILE              F3B01820    
       00302  0 34000 0 01220        CAS FFLWC           TEST IF FIRST FILE BUFFER                    F3B01830    
       00303  0 02000 0 00262        TRA F2              IS EMPTY                                     F3B01840    
       00304  0 02000 0 00306        TRA F5              N0, GET NEXT CIT ENTRY                       F3B01850    
       00305  0 07400 4 00004        TSX 4,4             WORD COUNT INC0RRECT                         F3B01860    
       00306  0 07400 4 00700  F5    TSX READFF,C        READ FIRST FILE                              F3B01870    
       00307 -0 76000 0 00141        MSE 97              TEST IF AT END OF FIRST FILE                 F3B01880    
       00310  0 02000 0 00262        TRA F2              BACK T0 GET  NEXT FIRST FILE ENTRY           F3B01890    
       00311  0 02000 0 00313        TRA H0                                                           F3B01900    
                                         END OF FIRST FILE ROUTINE                                    F3B01910    
       00312  0 07400 4 00724  H1    TSX M31000,C        READ TIFG0 FILE                              F3B01920    
       00313 -0 76000 0 00142  H0    MSE 98              END OF TIFG0 FILE                            F3B01930    
       00314  0 02000 0 00316        TRA H2              N0                                           F3B01940    
       00315  0 02000 0 00443        TRA OUT             YES, T0 TERMINAL ROUTINE                     F3B01950    
       00316  0 53400 4 01145  H2    LXA L(4),C              COMPILE                                  F3B01960    
       00317  0 50000 2 02216  H4    CLA TFGBUF,B            TIFGD                                    F3B01970    
       00320  0 60100 4 01220        STO TFGCOM+4,C          FILE                                     F3B01980    
       00321  1 77777 2 00322        TXI H3,B,-1             INSTRUCT10N                              F3B01990    
       00322  2 00001 4 00317  H3    TIX H4,C,1                                                       F3B02000    
       00323  0 07400 4 01022        TSX CIT00,C         COMPILER                                     F3B02010    
       00324  0 00000 0 01214        HTR TFGCOM                                                       F3B02020    
       00325  0 00000 0 01215        HTR TFGCOM+1                                                     F3B02030    
       00326  0 00000 0 01216        HTR TFGCOM+2                                                     F3B02040    
       00327  0 00000 0 01217        HTR TFGCOM+3                                                     F3B02050    
       00330 -0 75400 2 00000        PXD 0,B                 COMPARE WORD COUNT                       F3B02060    
       00331  0 34000 0 01212        CAS TFGWC               WITH BUFFER SIZE                         F3B02070    
       00332  0 02000 0 00316        TRA H2                  WC LESS THAN BS                          F3B02080    
       00333  0 02000 0 00335        TRA H5                  WC EQUALS BS                             F3B02090    
       00334  0 07400 4 00004        TSX 4,4             WORD COUNT INCQRRECT                         F3B02100    
       00335  0 07400 4 00654  H5    TSX READTF,C        BUFFER N0W EMPTY, READ NEXT BLOCK            F3B02110    
       00336  0 02000 0 00313        TRA H0                                                           F3B02120    
                                                             ALPHA EQUALS BETA                        F3B02130    
       00337  0 50000 2 02216  J1    CLA TFGBUF,B        TEST IF LOC. WORD OF TIFG0 FILE IS           F3B02140    
