                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 345/349 ------           
       06576 -0 60200 1 01104 BCDE8  ORS DOTAGZ+6,1                                                   F2517830    
       06577 -0 75400 2 00000 BCDE9  PXD 0,2               BLOCK NUMBER MUST BE                       F2517840    
       06600  0 76700 0 00016        ALS 14                STORED IN PROPER POS.                      F2517850    
       06601  0 53400 1 05240        LXA POSIND,1          OF TAG 4 WORD.                             F2517860    
       06602 -3 00001 1 06606        TXL BCDE10-1,1,1                                                 F2517870    
       06603 -3 00002 1 06607        TXL BCDE10,1,2        IF POSITION IS LEFT,                       F2517880    
       06604 -0 50000 0 05140        CAL BIT8              PLACE A ONE IN BIT 7 OF TAG4               F2517890    
       06605  0 02000 0 06607        TRA BCDE10            T0 INDICATE BLOCK D SPECIAL.               F2517900    
       06606  0 77100 0 00003        ARS 3                                                            F2517910    
       06607 -0 53400 2 05237 BCDE10 LXD XTG,2                                                        F2517920    
       06610 -0 60200 2 02341        ORS MXTGTG+3,2                                                   F2517930    
       06611  0 07400 4 06224        TSX CILV,4            0BTAIN L0C. FOR THIRD                      F2517940    
       06612  0 50000 0 05046        CLA L(TIX)            INST. AND 0PERATION PART                   F2517950    
       06613  0 60100 0 05177        STO CIL01             FOR 2ND WORD.                              F2517960    
       06614  0 07400 4 06625        TSX CIL23,4           FILL OUT REMAINING WORDS.                  F2517970    
       06615  0 07400 4 04345        TSX CIT,4                                                        F2517980    
       06616 -0 53400 4 06567        LXD BCDE2,4                                                      F2517990    
       06617  0 02000 4 00001        TRA 1,4                                                          F2518000    
                                         *************************************************************F2518010    
                                         NBITS IS0LATES THE VARIABLE PARAHETER BITS FOR A GIVEN DOTAG.F2518020    
       06620  0 50000 2 01076 NBITS  CLA DOTAGZ,2          ROUTINE FOR IS0LATING                      F2518030    
       06621  0 77100 0 00017        ARS 15                THE N BITS QF A DO.                        F2518040    
       06622 -0 32000 0 05076        ANA L(7)                                                         F2518050    
       06623  0 60100 0 05235        STO N1N2N3                                                       F2518060    
       06624  0 02000 4 00001        TRA 1,4                                                          F2518070    
                                         *************************************************************F2518080    
                                         CIL23 FILLS OUT THE ADDRESS AND TAG NAHE WORDS FOR A COMPILEDF2518090    
                                         INSTRUCTION WHEN THE ADDRESS IS T0 BE THE NEXT SEQUENTIAL INSF2518100    
                                         TRUCTION AND THE L0CATION WORD IS FILLED ELSEWHERE.          F2518110    
       06625  0 50000 0 05176 CIL23  CLA CIL00             THIS ROUTINE PLACES TAG IN                 F2518120    
       06626  0 60100 0 05200        STO CIL02             TAG WD. OF CIL03 AN0 1                     F2518130    
       06627  0 50000 0 03652        CLA TAG3              IN DECREMENT FOR THE                       F2518140    
       06630 -0 32000 0 05141        ANA ADMSK             RELATIVE PART,                             F2518150    
       06631 -0 50100 0 05061        ORA L1DEC             PLACES THE L0CATION IN                     F2518160    
       06632  0 60100 0 05201        STO CIL03             THE ADDRESS WORD CIL02 .                   F2518170    
       06633  0 02000 4 00001        TRA 1,4                                                          F2518180    
                                         **************************,**********************************F2518190    
                                         CILNAM ENTERS 0NLY THE TAG NAHE.                             F2518200    
       06634  0 50000 0 03652 CILNAM CLA TAG3              THIS ROUTINE                               F2518210    
       06635 -0 32000 0 05141        ANA ADMSK             ENTERS THE                                 F2518220    
       06636  0 60100 0 05201        STO CIL03             TAG NAHE                                   F2518230    
       06637  0 02000 4 00001        TRA 1,4               IN CIL.                                    F2518240    
                                         *************************************************************F2518250    
                                                                                                      F2518260    
                                                                                                      F2518270    
                                            MASTER RECORD CARD = FN049                                F2518275    
                                         BEGIN ALPHA STATL                                            F2518280    
                                         THE ALPHA STATE, AC, IS CALLED 8Y HAN T0 CQHPILE ALL IN)TIALIF2518290    
                                         ZATION  AND LOAD INSTRUCTIONS WHEN AN ALPH OF A DQ IS UNDER CF2518300    
                                         C0NSIDERATION.                                               F2518310    
                        05256        ORG RTX                                                          F2518320    
       05256 -0 63400 4 06252 AC     SXD AC248,4           STORE LINKAGE                          /               
       05257  0 60100 0 05244        STO VCTR              DOTAG ALPHAGIS L0CATION.                   F2518330    
       05260  0 50000 2 01104        CLA DOTAGZ+6,2        PLACE 4*,H*))*)(AR/HUIWH)                  F2518340    
