                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 355/359 ------           
       06226  0 53400 1 05127 AC230I LXA L(2),1            G =1, N3 N0T = 1.                          F2523210    
       06227  0 50000 0 07372        CLA LTX042                                                       F2523220    
       06230  0 07400 4 07271        TSX LXC,4            THIS CASE.                                  F2523230    
       06231  0 50000 0 05157 AC234  CLA INST3             RESET M0DIFIED AOR0.                       F2523240    
       06232  0 60100 0 06424        STO AOR030            LXC L(4),1.                                F2523250    
       06233  0 50000 0 05156        CLA INST2                                                        F2523260    
       06234  0 60100 0 06430        STO AOR040            LXD L(2),1.                                F2523270    
       06235 -0 53400 1 05207  AC236 LXD AX,1                                                         F2523280    
       06236  2 00001 1 06063        TIX AC200,1,1                                                    F2523290    
       06237  0 02000 0 05315 AC240  TRA AC010                                                        F2523300    
       06240  0 53400 2 05125        LXA LADMX,2           START ADTG COMPILING.                      F2523310    
       06241  1 00004 2 06242        TXI AC240+3,2,4                                                  F2523320    
       06242 -0 63400 2 05237        SXD XTG,2                                                        F2523330    
       06243  0 50000 0 05162        CLA INST8             L(TRA AC244).                              F2523340    
       06244  0 62100 0 06237        STA AC240             M0DIFY RETURN FOR ADTG ENTRY.              F2523350    
       06245  0 62100 0 05323        STA AC016                                                        F2523360    
       06246  0 50000 0 05163        CLA INST10                                                       F2523370    
       06247  0 62100 0 05773        STA AC165+3                                                      F2523380    
       06250  0 07400 4 04516 AC244  TSX ADTGSE,4          FIND VALID ADTG ENTRY.                     F2523390    
       06251  0 02000 0 06253        TRA AC250             END OF TABLE , GET NEXT DO.                F2523400    
 D     06252 -3 00000 0 05320 AC248  TXL AC014,0           VALID ENTRY, C0NTINUE AC CYCLE.            F2523410    
       06253  0 50000 0 05164 AC250  CLA INST11            REINITIALIZE                               F2523420    
       06254  0 62100 0 06237        STA AC240             INSTRUCTIONS                               F2523430    
       06255  0 62100 0 05323        STA AC016             M0DIFIED                                   F2523440    
       06256  0 50000 0 05165        CLA INST12            FOR DMTAG                                  F2523450    
       06257  0 62100 0 05773        STA AC165+3           CYCLE,                                     F2523460    
       06260  0 50000 0 05222        CLA L0CIND            COMPILE AT LEAST                           F2523470    
       06261  0 10000 0 06272        TZE AC260             A BSS INST S0                              F2523480    
       06262  0 50000 0 05224        CLA A                 THAT TRA INST                              F2523490    
       06263  0 60100 0 05176        STO CIL00             WILL FUNCTION                              F2523500    
       06264  0 50000 0 05133        CLA L(0)              PROPERLY.                                  F2523510    
       06265  0 60100 0 05200        STO CIL02                                                       F2523520     
       06266  0 60100 0 05201        STO CIL03                                                       F2523530     
       06267  0 50000 0 05056        CLA L(BSS)                                                      F2523540     
       06270  0 60100 0 05177        STO CIL01                                                       F2523550     
       06271  0 07400 4 04345        TSX CIT,4                                                       F2523560     
       06272 -0 53400 4 06252 AC260  LXD AC248,4           END OF                                     F2523570    
       06273  0 02000 4 00001        TRA 1,4               ALPAHA CYCLE.                              F2523580    
                                         *************************************************************F2523590    
                                         CDOR0 TAKES C0EF. AND DIM. AND FILLS OUT OR0.                F2523600    
       06274 -0 63400 4 06277 CDOR0  SXD CDOR01,4                                                    F2523610     
       06275 -0 53400 2 05207        LXD AX,2                                                        F2523620     
       06276 -0 76000 0 00144        MSE 100                                                         F2523630     
 D     06277  3 00000 0 06300 CDOR01 TXH CDOR01+1,0        WHICH SUB IS IT.                           F2523640    
       06300 -3 00002 2 06307        TXL CDOR03,2,2        S2 0R S3, TRA.                             F2523650    
       06301  0 50000 0 03636        CLA WRKSC             S1,                                        F2523660    
       06302  0 40200 0 05061        SUB L1DEC             IS C1 GREATER THAN1.                       F2523670    
       06303  0 10000 4 00001        TZE 1,4               C1=1, RETURN.                              F2523680    
       06304  0 76000 0 00144        PSE 100               C1 N0T = 1, TURN 0N                        F2523690    
       06305  0 50000 0 03636        CLA WRKSC             SENSE LIGHT , IS0LATE C1.                  F2523700    
       06306  0 02000 0 06317        TRA CDOR07+1                                                    F2523710     
       06307  0 56000 0 03644 CDOR03 LDQ WRKSC+6           IS0LATE D1.                                F2523720    
       06310 -3 00001 2 06313        TXL CDOR05,2,1        WHICH-SUB-IS.IT.                           F2523730    
       06311  0 20000 0 03640        MPY WRKSC+2           S2, FORM C2D1.                             F2523740    
