                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 331/335 ------           
                                         DO.                                                          F2510270    
       05256 -0 63400 4 05325 RTX    SXD RTX024,4                                                     F2510280    
       05257 -0 53400 1 05244        LXD VCTR,1            VARIABLE CTR.  LAST BETA.                  F2510290    
       05260 -0 53400 2 05230        LXD DOIND,2           NEW DO                                     F2510300    
       05261  0 50000 2 01076        CLA DOTAGZ,2          ALPHA BETA WORD OF DO.                     F2510310    
       05262  0 73400 2 00000        PAX 0,2               PLACE B IN X.                              F2510320    
       05263 -0 63400 2 05264        SXD RTX04,2                                                      F2510330    
 D     05264 -3 00000 1 05276 RTX04  TXL RTX05,1           IS THIS THE FIRST BETA,                    F2510340    
       05265 -0 75400 2 00000        PXD 0,2                                                          F2510350    
       05266  0 40000 0 05111        ADD L(K1)             FIRST B. SET                               F2510360    
       05267  0 60100 0 05244        STO VCTR              VCTR AND                                   F2510370    
       05270  0 50000 0 05123        CLA ALLONE            INITIALIZE                                 F2510380    
       05271  0 60100 0 05176        STO CIL00             CIL BUFFER                                 F2510390    
       05272  0 60100 0 05177        STO CIL01             T0 ALL ONES.                               F2510400    
       05273  0 60100 0 05200        STO CIL02                                                        F2510410    
       05274  0 60100 0 05201        STO CIL03                                                        F2510420    
       05275  0 07400 4 04352        TSX CITSP,4           USE SPECIAL CIT ENTRY.                     F2510430    
       05276  0 50000 0 05133 RTX05  CLA L(0)              INITIALIZE THE TEST TAG                    F2510440    
       05277  0 60100 0 05220        STO TETTGX            INDEX FOR THIS DO T0 ZER0.                 F2510450    
       05300  0 60100 0 05237        STO XTG                                                          F2510460    
       05301  0 60100 0 05221        STO RTXTGX                                                       F2510470    
       05302  0 60100 0 05216        STO ADTGX                                                        F2510480    
       05303  0 07400 4 06235        TSX N3BIT,4           IS0LATE N3 BIT OF DOTAG                    F2510490    
       05304  0 07400 4 04153        TSX SCAN,4                                                       F2510500    
       05305 -0 63400 1 05221 RTXIN1 SXD RTXTGX,1          STORE FIRST TTG FOR TX CYCLE.              F2510510    
       05306 -0 63400 1 05237        SXD XTG,1             ENTRY THAT LIES BETWEEN A AND B            F2510520    
       05307  0 07400 4 04162 RTX06  TSX FIND,4                                                       F2510530    
       05310  0 02000 0 05707        TRA RTX180            END OF DO, START 0HTG CYCLE.               F2510540    
       05311 -0 63400 1 05237        SXD XTG,1             SC M0DIFIED BY DO, STORE.                  F2510550    
       05312  0 07400 4 06243        TSX TETG,4            PLACE TEST BITS IN TAG WORD.               F2510560    
       05313  0 07400 4 06277        TSX PRES,4                                                       F2510570    
                                         AT THE END OF THIS ROUTINE THE BLO0K INDICATION IS IN XB.    F2510580    
       05314  3 00004 2 05673        TXH RTX160,2,4        BLOCK F, N0 INSTRUCTIONS, GET NEW TAG.     F2510590    
       05315  3 00000 2 05435        TXH RTX70,2,0         BLOCK DIFFERENT FR0H A 0R F,               F2510600    
       05316  0 50000 0 05234        CLA N3IND             )BLQX EQUALSA.                             F2510610    
       05317 -0 10000 0 05403        TNZ RTX68             DECREMENT OF RXA IS VARIABLE         .     F2510620    
       05320 -0 53400 1 03652 RTX020 LXD TAG3,1            DECREMENT IS C0NSTANT.                     F2510630    
       05321  3 00000 1 05334        TXH RTX50,1,0         TEST FOR INSERTED COUNTER.                 F2510640    
       05322  0 50000 0 03652        CLA TAG3              0R RESET TAG.                              F2510650    
       05323  0 76500 0 00013        LRS 11                                                           F2510660    
       05324  0 76000 0 00001        LBT                                                              F2510670    
 D     05325 -3 00000 0 05327 RTX024 TXL RTX30,0           RESET                                      F2510680    
       05326  0 02000 0 05332        TRA RTX34             COUNTER.                                   F2510690    
       05327  0 50000 0 03652 RTX30  CLA TAG3              IF RESET TAG, PUT TAG                      F2510700    
       05330 -0 32000 0 05153        ANA 11BITS            NAME IN ACCUHULAT0R AND                    F2510710    
       05331  0 02000 0 05336        TRA RTX51             (M)T0 SUBCOM.                              F2510720    
       05332  0 07400 4 04230 RTX34  TSX ENTR,4            IF COUNTER, MAKE                           F2510730    
       05333  0 02000 0 05337        TRA RTX52             ARTIFICIAL ENTRY IN WRKSC.                 F2510740    
       05334 -0 75400 1 00000 RTX50  PXD 0,1               CURRENT TAG.                               F2510750    
       05335  0 77100 0 00022        ARS 18                GET TAG NANE                               F2510760    
       05336  0 07400 4 04236 RTX51  TSX SUBCOM,4          LAY OUT TAU ENTRY.                         F2510770    
       05337  0 50000 0 05042 RTX52  CLA L(TXI)            COMPILE                                    F           
       05340  0 60100 0 05177        STO CIL01             TXI,)L*                                    F2510780    
       05341  0 53400 1 05240        LXA POSIND,1          PREPARE FOR                                F2510790    
