                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 270/274 ------           
       05632  0 07400 4 05441 DSDR55 TSX TRAWRD,4                  GO TO TRAWRD AND                   F2216220    
       05633  0 60100 0 06371        STO D2D1                      SAVE IF N0T ZER0                   F2216230    
       05634 -0 53400 4 03732        LXD DELTA,4                   RETURN HERE                        F2216240    
       05635  3 00002 4 05703        TXH DSDR85,4,2                TRANSFER IF DELTA IS THREE         F2216250    
       05636  0 10000 0 05602        TZE DSDR20                    RETURN IF RESULT ZER0              F2216260    
       05637 -0 63400 1 05733        SXD DSDR95,1                                                     F2216270    
       05640 -3 00001 4 05655        TXL DSDR65,4,1                TR IF DELTA=1                      F2216280    
       05641  0 50000 0 03761        CLA L(36)                     FOR DELTA=2,SEPARATE               F2216290    
       05642  0 40200 0 03675        SUB LC                        TRAWRD RESULTS.                    F2216300    
       05643  0 77100 0 00022        ARS 18                                                           F2216310    
       05644  0 62100 0 05647        STA DSDR60                                                       F2216320    
       05645  0 56000 0 03751        LDQ L(0)                                                         F2216330    
       05646  0 50000 0 06371        CLA D2D1                                                         F2216340    
 A     05647  0 76500 0 00000 DSDR60 LRS                                                              F2216350    
       05650  0 10000 0 05652        TZE DSDR62                    IF TRANSFERS EXIST DC T0 DL,       F2216360    
       05651  0 76000 0 00144        PSE 100                       SET SENSE SWITCH                   F2216370    
       05652 -0 60000 0 06371 DSDR62 STQ D2D1                                                         F2216380    
       05653  0 50000 0 06371        CLA D2D1                                                         F2216390    
       05654  0 10000 0 05700        TZE DSDR80                    IF N0 TRANSFERS DR T0 DC,EXIT      F2216400    
       05655  0 50000 0 03672 DSDR65 CLA ATSW                      TEST ADDED TAG SWITCH              F2216410    
       05656 -0 10000 0 05700        TNZ DSDR80                    IF ADDED DELTA TWO, SKIP INSERT    F2216420    
       05657 -0 53400 1 06365        LXD XR1,1                     IS TAG IN DR1                      F2216430    
       05660  0 07400 4 05411        TSX TINFOR,4                  GO TO TINFOR AND RETURN            F2216440    
       05661  0 02000 0 05667        TRA DSDR70                    F0UND                              F2216450    
       05662 -0 53400 2 03751        LXD L(0),2                    N0T F0UND                          F2216460    
       05663 -0 53400 1 06365        LXD XR1,1                                                        F2216470    
       05664  0 07400 4 05254        TSX TAGADD,4                  INSERT TAG IN R1,RETURN            F2216480    
       05665 -0 60000 0 06374        STQ TR1                       HERE AND STORE NAME IN TR1         F2216490    
       05666  0 02000 0 05675        TRA DSDR75                                                       F2216500    
       05667 -0 53400 1 06365 DSDR70 LXD XR1,1                     FIND NAME OF TAG IN R1             F2216510    
       05670  0 50000 1 00733        CLA DOTAGZ,1                                                     F2216520    
       05671 -0 32000 0 03772        ANA DECMSK                                                       F2216530    
       05672  0 40000 0 03700        ADD TAG                                                          F2216540    
       05673  0 07400 4 06376        TSX GETNAM,4                                                     F2216550    
       05674  0 60100 0 06374        STO TR1                                                          F2216560    
       05675 -0 53400 1 06365 DSDR75 LXD XR1,1                     LIST STORES                        F2216570    
       05676 -0 53400 2 03751        LXD L(0),2                                                       F2216580    
       05677  0 07400 4 06431        TSX STORES,4                                                     F2216590    
       05700 -0 53400 1 05733 DSDR80 LXD DSDR95,1                                                     F2216600    
       05701 -0 53400 4 03732        LXD DELTA,4                                                      F2216610    
       05702  0 02000 0 05602        TRA DSDR20                                                       F2216620    
       05703  0 10000 0 06022 DSDR85 TZE 2R0000                    GO TO R2 SEARCH IF N0 TRA R1 T0 D6 F2216630    
       05704 -0 53400 1 06365        LXD XR1,1                     IF TRA R1 T0 DC,                   F2216640    
       05705 -0 53400 2 03752        LXD L(1),2                    USE SPC000 T0 L00K FOR             F2216630    
       05706  0 07400 4 05277        TSX SPC000,4                  TAG IN R1                          F2216660    
       05707  0 02000 0 05717        TRA DSDR87                    N0T F0UND,GQ T0 DSDR87             F2216670    
       05710 -0 53400 1 06365        LXD XR1,1                     F0UND,USE SUBROUT)NE               F2216680    
       05711  0 50000 1 00733        CLA DOTAGZ,1                  GETNAM T0 DETERMINE LABLE          F2216690    
       05712 -0 32000 0 03772        ANA DECMSK                    OF TAG IN R1                       F2216700    
       05713  0 40000 0 03700        ADD TAG                                                          F2216710    
       05714  0 07400 4 06376        TSX GETNAM,4                                                     F2216720    
       05715  0 60100 0 06374        STO TR1                       PUT NAME IN TR1                    F2216730    
       05716  0 02000 0 05726        TRA DSDR89                                                       F2216740    
       05717 -0 53400 1 06365 DSDR87 LXD XR1,1                     USE TAGADD T0 INSERT               F2216750    
