                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 286/290 ------           
       07002  0 50000 1 03670        CLA FORTZ,1       ROUTINE. FOR THIS TAG,                         F2303680    
       07003 -0 12000 0 07014        TMI VAL70         AND ALL TAGS EQUAL T0                          F2303690    
       07004 -0 32000 0 06677        ANA BITONE        THIS TAG, SET FORTAG                           F2303700    
       07005 -0 10000 0 07014        TNZ VAL70         ENTRY BIT ONE EQUAL                            F2303710    
       07006  0 50000 1 03670        CLA FORTZ,1       T0 ONE.                                        F2303720    
       07007 -0 32000 0 06703        ANA ADDMSK                                                       F2303730    
       07010  0 40200 0 06626        SUB TAG                                                          F2303740    
       07011 -0 10000 0 07014        TNZ VAL70                                                        F2303750    
       07012  0 50000 0 06677        CLA BITONE                                                       F2303760    
       07013 -0 60200 1 03670        ORS FORTZ,1                                                      F2303770    
       07014  1 77777 1 07015 VAL70  TXI VAL80,1,-1                                                   F2303780    
 D     07015  3 00000 1 07002 VAL80  TXH VAL60+1,1     IF FORTAG DONE,       (DEC HAS FORTAGIX)       F2303790    
       07016 -0 53400 1 07000        LXD SAVEA,1       G0 BACK                          )---.--       F2303800    
       07017  1 77777 1 07020 VAL90  TXI VAL95,1,-1    FOR NEXT TAG                                   F2303810    
 D     07020  3 00000 1 06736 VAL95  TXH VAL10,1       IF ANY        (DEC HAS FORTAGIX)               F2303820    
       07021  0 02000 0 07616        TRA NORMRT         NORM RET M0NIT0R. GO TO SPACE TAPE 1          F2303835    
       07022 -0 53400 1 06674 TABSER LXD L(1500,1      SEARCH                                         F2303840    
       07023 -0 63400 2 07032        SXD TAB40,2              (6 - 2X N0 SUB SYMB0LS     - VAL40)     F2303850    
       07024 -0 53400 2 06670 TAB10  LXD L(3),2        FORVAL                                         F2303860    
       07025  0 50000 1 06626        CLA 4VALZ+1,1     FOR AN                                         F2303870    
       07026  0 34000 2 06635 TAB20  CAS RSYM1+3,2     0CCURRANCE                                     F2303880    
       07027  0 02000 0 07031        TRA TAB30         OF ANY SYMB0L                                  F2303890    
       07030  0 02000 0 07036        TRA F0UND         IN THIS SC.                                    F2303900    
       07031  1 77777 2 07032 TAB30  TXI TAB40,2,-1                                                   F2303910    
 D     07032  3 00000 2 07026 TAB40  TXH TAB20,2                ( DEC LOADED FR0M TABSER + 1)         F2303920    
       07033  1 77775 1 07034 TAB50  TXI TAB60,1,-3                                         -         F2303930    
 D     07034  3 00000 1 07024 TAB60  TXH TAB10,1                      (DEC HAS FORVALIX)              F2303940    
       07035  0 02000 0 07001        TRA VAL60                                                        F2303950    
       07036 -0 63400 1 07053 F0UND  SXD FND10,1       IF SYMB0L F0UND,                               F2303960    
       07037 -0 53400 4 06630        LXD TAGIND,4      MAKE NORMAL 0R SPECIAL                         F2303970    
       07040  0 50000 1 06625        CLA 4VALZ,1       ENTRY IN TSXCOM, DEPENDING                     F2303980    
       07041  3 00000 4 07054        TXH FND20,4,0     0N TAGIND. (UNLESS SEE SUBRT INDO)             F2303990    
       07042  0 60100 0 07112        STO FORNR                                                        F2304000    
       07043  0 07400 4 07064        TSX INDO,4                                                       F2304010    
       07044  0 02000 0 07062        TRA FND40         INDO RETURN IF FRVL ALPH IN RANGE MTCHNG DOTAG F2304020    
       07045 -0 53400 1 07053        LXD FND10,1       RETURN FR0H INDO WHEN N0T S0.              )-- F2304030    
       07046  0 50000 1 06625        CLA 4VALZ,1                                                      F2304040    
       07047  0 60100 0 07656        STO E1            SPECIAL ENTRY IF TAGIND                        F2304050    
       07050  0 50000 0 06626        CLA TAG           N0T ZER0                                       F2304060    
       07051  0 76700 0 00022        ALS 18                                                           F2304070    
       07052 -0 50100 0 06626        ORA TAG                                                          F2304080    
 D     07053 -3 00000 0 07057 FND10  TXL FND30,0                   (DEC HAS FORTAG IX)                F2304090    
       07054 -0 50100 0 06626 FND20  ORA TAG           SET UP E BLOCK WHEN TAGIN0 EQUAL  1            F2304100    
       07055  0 60100 0 07656        STO E1                                                           F2304110    
       07056  0 50000 0 06632        CLA RSYM1         TAG SYMB0L                                     F2304120    
       07057  0 60100 0 07657 FND30  STO E2                                                           F2304130    
       07060  0 50000 0 07662        CLA TSXCOM        TSXCOM KEY                                     F2304140    
       07061  0 07400 4 07620        TSX LIST,4                                                       F2304150    
       07062 -0 53400 1 07053 FND40  LXD FND10,1                                                      F2304160    
       07063  0 02000 0 07033        TRA TAB50         C0NTINUE SEARCH                                F2304170    
                                         SUBRT INDO.... THIS ROUTINE DETERHJNES  WHETHER THE FORVAL   F2304180    
                                         WHICH HAS BEEN F0UND T0 HATCH A SUBSCRIPT FALLS WITHIN RANGE F2304190    
                                         OF A DO WHICH IN TURN MATCHES THE FORAVAL. IF S0 A RETURN.IS F2304200    
                                         MADE AND TSXCOM ENTRY FOR THIS FORVAL ALPHA IS 0MHITTED.     F2304210    
