                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 236/240 ------           
 D     07055  3 00000 1 07004 RH90   TXH RH10,1                    BACK, IF P0SSIBLE.                 F2107920    
       07056  0 02000 0 07163 RH95   TRA LB00                                                                     
 A     07057  0 00000 0 00000 RHNNX  HTR                           EXIT NGST INDEX                    F2107930    
 A     07060  0 00000 0 00000 RHCNX  HTR                           CU21ENT=NEST=INDEX                 F2107940    
 A     07061  0 00000 0 00000 RFIRST HTR                           ALPLI=ADDRESS,NU*A                 F2107960    
 A     07062  0 00000 0 00000 RLAST  HTR                           BETA-,2DRESS=                      F2107970    
       07063  0 00000 0 00000                                                                                     
       07064  0 62100 0 07105 RTAPE  STA RT40                                                                     
       07065  0 60100 0 07132        STO RT92                      INITIALIZE TABLE ADDRESS           F2107990    
       07066 -0 63400 4 07130        SXD RT80,4                    SAVEXRC, TSX SET                   F2108000    
       07067 -0 75400 2 00000        PXD 0,2                       SAVE.XRB,,S. S*)                   F2108020    
       07070  0 77100 0 00022        ARS 18                        TABLE NR, IN ADDRESS.              F2108030    
       07071  0 60100 0 07131        STO RT90                      TABLE NR, IN ADDRESS.              F2108030    
       07072 -0 53400 4 07142        LXD RTD18,4       INITIALIZE ERROR COUNTER.                      F2108050    
       07073 -0 63400 4 07125        SXD RT73,4          .).--..- -==-= .44=H,,*                      F2108060    
       07074  0 76200 0 00222 RT10   RDS TTAPE                     SELECT TAPE                        F2108070    
       07075 -0 53400 1 07132        LXD RT92,1                    PUT=MAX)NR*WORDS IN XRA            F2108080    
       07076 -0 53400 4 05476        LXD L(2),4                    PUT TWO IN XRCPS ,N AHA            F2108090    
       07077  0 70000 4 07135 RT20   CPY RT95+2,4                  COPY.FIRST TWO WORDS.              F2108100    
       07100  0 02000 0 07103        TRA RT30                      INTO E,S.. ,== *U=US.              F2108110    
       07101  0 07400 4 00004        TSX DIAG,4  EOF.              .=.- 4.=. ERROR. GO TO DIAGN0STIC  F2108125    
       07102  0 07400 4 00004        TSX DIAG,4  EOR                         E==0R. GO TO DIAGN0STIC. F2108135    
       07103  2 00001 4 07077 RT30   TIX RT20,4,1                            E==0R. GO TO DIAGN0STIC. F2108135    
       07104 -3 00001 2 07135        TXL RTDO0,2,1                                                    F2108140    
       07105  0 70000 1 00000 RT40   CPY 0,1                       COPY TABLE                         F2108150    
       07106  1 77777 1 07105        TXI RT40,1,-1                 COUNT,NR.,OF WORDS.                F2108170    
       07107  0 07400 4 00004        TSX DIAG,4  EOF                         ERROR. GO TO DIAGN0STIC. F2108183    
       07110  0 76600 0 00333 RT45   WRS 219                                 ERROR. GO TO DIAGN0STIC. F2108183    
       07111 -0 76000 0 00012        RTT                           ERROR TEST                         F2108190    
       07112  0 02000 0 07121        TRA RT70                      ERROR,.TRA                         F2108200    
       07113  0 50000 0 07131        CLA RT90                      E2-ERROR,=                         F2108220    
       07114  0 40200 0 07133        SUB RT95                      TEST=TABLE NR.                     F2108230    
       07115  0 10000 0 07117        TZE RT60                      L2-ERROR44 ==.                     F2108240    
       07116  0 07400 4 00004        TSX DIAG,4  WR0NG TABLE 1DENT NR.)F *0P*ERROR. GO TO DIAGN0STIC. F2108255    
       07117 -0 53400 4 07130 RT60   LXD RT80,4  WR0NG TABLE 1DENT NR.)F *0P*ERROR. GO TO DIAGN0STIC. F2108255    
       07120  0 02000 4 00001        TRA 1,4                                                                      
       07121 -0 53400 4 07125 RT70   LXD RT73,4                    .-)--=.                            F2108270    
       07122  0 76400 0 00222        BST TTAPE                     ERROR, BACKSPACE TAPE              F2108290    
       07123 -2 00001 4 07126        TNX RT75,4,1                  -----. =--.--=-. ).,,              F2108300    
       07124 -0 63400 4 07125        SXD RT73,4                                                                   
 D     07125 -3 00000 0 07074 RT73   TXL RT10,0                    ----= .=.=1..=4= ,44=U,=.          F2108320    
       07126  0 56000 0 07131 RT75   LDQ RT90          IF FIVE FAILURES, PUT                          F2108332    
       07127  0 07400 4 00004        TSX DIAG,4  T   E     IN  -.  T,, )NH,, EC2C7.,G0 )U DIAGNUSTIC. F2108343    
 A     07130  0 00000 0 00000 RT80   HTR     ,4  T   E     IN  -.  T,, )NH,, EC2C7.,G0 )U DIAGNUSTIC. F2108343    
 A     07131  0 00000 0 00000 RT90   HTR                           TSBLINDEXSST0RAGE C S              F2108350    
 A     07132  0 00000 0 00000 RT92   HTR                           ADDRESS=WORD=ST0,AG.S.             F2108370    
 A     07133  0 00000 0 00000 RT95   HTR                           TABLE-NR,=WD ONE=OF*TABLE.         F2108380    
 A     07134  0 00000 0 00000 RT96   HTR                           NR.-OF-WDS=IN=DEC=, )4SL,.         F2108390    
       07135 -0 75400 0 00000 RTDO0  PXD 0,0                       THIS-ROUTINE= =--.                 F2108400    
       07136 -0 53400 4 07142 RTD10  LXD RTD18,4                   READS=IN)ONE                       F2108410    
       07137  0 70000 1 02537 RTD15  CPY DOTAGZ,1                  ENTRY FR0M=-                       F2108420    
       07140  1 77777 1 07143        TXI RTD20,1,-1                TDO,)AFTER WHICH                   F2108430    
       07141  0 07400 4 00004        TSX DIAG,4  F0UR ZER0 WORDS   )=-, -,)4=ERROR. GO TO DIAGN0STIC. F2108445    
       07142 -3 00005 0 07110 RTD18  TXL RT45,0,5              -   ARE STORED,BEFORE=U )U U)AUNUS))C. F2108450    
