                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 371/375 ------           
 U     00000    00000 0       SECTION TWO.                                                                        
                                         BLOCK SIX OF SECTION TWO.                                                
                                            MASTER RECORD CARD = FN053                                F2600010    
                                         DOFILE INVERSI0N ROUTINE--BLOCK 6                            F2600020    
                        00030        ORG 24                0RIGIN FOR DFI INSTRUCTIONS.               F2600030    
       00030  0 77200 0 00224 DFI01  REW 148               REWIND OUTPUT TAPE 4                       F2600040    
       00031  0 77200 0 00223        REW 147               AND INPUT TAPE 3                           F2600050    
       00032  0 76200 0 00224 DFI02  RDS 148               SPACE                                      F2600060    
       00033  0 70000 0 00164        CPY ERAS              0VER                                       F2600070    
       00034  0 02000 0 00032        TRA DFI02             FIRST FILE                                 F2600080    
       00035  0 02000 0 00037        TRA DFI03             OF OUTPUT TAPE                             F2600090    
       00036  0 07400 4 00004        TSX DIAG,4            FALSE END OF RECORD.                       F2600100    
       00037 -0 76000 0 00143 DFI03  MSE 99                TEST SENSE LIGHT 3 FOR EMPTY INPUT         F2600110    
       00040  0 02000 0 00044        TRA DFI05             N0T EMPTY                                  F2600120    
       00041  0 76000 0 00142        PSE 98                TURN 0N SENSE LIGHT 2, EMPTY OUTPUT.       F2600130    
       00042  0 77000 0 00224 DFI04  WEF 148               WRITE END OF FILE 0N OUTPUT TAPE.          F2600140    
       00043  0 02000 0 00154        TRA EXIT              EXIT FR0H DFI ROUTINE.                     F2600150    
       00044  0 53400 1 00157 DFI05  LXA L(0),1            INITIALIZE TQ BEGIN READING INTO N         F2600160    
       00045 -0 76000 0 00143        MSE 99                TURN OFF                                   F2600170    
       00046  0 76100 0 00000        NOP                   SENSE LIGHT 3                              F2600180    
       00047 -0 76000 0 00012        RTT                   TURN OFF                                   F2600190    
       00050  0 76100 0 00000        NOP                   TAPE CHECK INDICAT0R                       F2600200    
       00051  0 53400 2 00160  DFI10 LXA L(5),2            INITIALIZE TAPE ERROR COUNTER              F2600210    
       00052 -0 63400 1 00164        SXD ERAS,1            SAVE INDEX 1 IN CAS OF REREAD              F2600220    
       00053  0 76200 0 00223 DFI11  RDS 147               PREPARE T0 READ INPUT TAPE                 F2600230    
       00054  0 70000 1 00200 DFI12  CPY NOR,1             COPY FIRST OF F0UR WORDS                   F2600240    
       00055  0 02000 0 00060        TRA DFI13                                                        F2600250    
       00056  0 02000 0 00042        TRA DFI04             END OF FILE--GO TO EXIT                    F2600260    
       00057  0 02000 0 00111        TRA DFI20             END OF RECORD//GO TO REDUND TEST           F2600270    
       00060  0 70000 1 00201 DFI13  CPY NOR+1,1           COPY SEC0ND OF F0UR WORDS                  F2600280    
       00061  0 02000 0 00064        TRA DFI14                                                        F2600290    
       00062  0 07400 4 00004        TSX DIAG,4            FLASE END OF FILE.                         F2600300    
       00063  0 07400 4 00004        TSX DIAG,4            FALSE END OF RECORD.                       F2600310    
       00064  0 70000 1 00202 DFI14  CPY NOR+2,1           COPY THIRD OF F0UR WORDS                   F2600320    
       00065  0 02000 0 00070        TRA DFI15                                                        F2600330    
       00066  0 07400 4 00004        TSX DIAG,4            FLASE END OF FILE.                         F2600340    
       00067  0 07400 4 00004        TSX DIAG,4            FALSE END OF RECORD.                       F2600I50    
       00070  0 70000 1 00203 DFI15  CPY NOR+3,1           CQPY F000H))CR)F(UR WORDS                  F2600360    
       00071  0 02000 0 00074        TRA DFI16                                                        F2600370    
       00072  0 07400 4 00004        TSX DIAG,4            FLASE END OF FILE.                         F2600380    
       00073  0 07400 4 00004        TSX DIAG,4            FALSE END OF RECORD.                       F2600390    
       00074  0 50000 1 00201 DFI16  CLA NOR+1,1                                                      F2600400    
       00075  0 10000 0 00122        TZE DFI30             2ND WORD ZER0 MEANS END OF NEST            F2600410    
       00076  0 40200 0 00161        SUB ALLONE            2ND WORD ALL ONES                          F2600420    
       00077  0 10000 0 00107        TZE DFI19             MEANS BEGINNING OF BLOCK                   F2600430    
       00100 -0 76000 0 00143        MSE 99                WAS PREVI0US F0UR WORDS BEG OF BLOCK       F2600440    
       00101  0 02000 0 00104        TRA DFI17             N0, LEAVE FIRST WORD PLUS                  F2600450    
       00102 -0 50000 0 00162        CAL L(M0)             MAKE SIGN OF                               F2600460    
       00103 -0 60200 1 00200        ORS NOR,1             FIRST WORD MINUS                           F2600470    
       00104  1 77774 1 00105 DFI17  TXI DFI18,1,-4        INDEX BY  4 FOR NEXT 4 WORDS               F2600480    
       00105  3 70300 1 00054 DFI18  TXH DFI12,1,-3904     TEST AND C0NTINUE NEXT  4 W0R0S            F2600490    
       00106  0 07400 4 00004        TSX DIAG,4            N0R BUFFER SIZE EXCEEDED.                  F2600500    
       00107  0 76000 0 00143 DFI19  PSE 99                TURN 0N BEGIN OF BLOCK IND                 F2600510    
       00110  0 02000 0 00054        TRA DFI12             C0NTINUE NEXT F0UR WORDS                   F2600520    
