NETwork1:                                                

     TAR1  #tmpSaveAR1
      TAR2  #tmpSaveAR2

      L     DBNO
      T     #tmpDBNO

      L     DINO
      T     #tmpDINO
 
NETwork2:
   
  L     #DBData
      T     #tmpDataDbNo

      L     #AddressOnMDS
      T     #tmpMDSAddress

      CLR  
      =     #tmpFin

      L     #DBRFIDParameter
      T     #tmpParameterDbNo
      L     0
      ==I  
      JC    END

      OPN   DB [#tmpParameterDbNo]

      L     DBW   20
      L     DBW   18
      ==I  
      =     #tmpGroupActive
      L     P#22.0
      +D    
      LAR1  

      AN    #Last
      JC    A999
      L     DBW   18
      +     1
      T     DBW   18

A999: NOP   0

NETwork3
 
  A     #Start
      AN    #tmpGroupActive
      AN    DBX  320.0
      AN    DBX  320.4
      AN    DBX [AR1,P#0.0]
      JC    STRT

      AN    #Last
      JC    END

      A     DBX [AR1,P#0.0]
      JC    FIN

      AN    #tmpGroupActive
      JC    END

      AN    #Start
      S     DBX  320.7

      AN    DBX  320.4
      AN    DBX  118.6
      AN    DBX    9.1
      JC    END
      L     -1
      T     DBW   20
      R     DBX  320.0

FIN:  AN    #Start
      O     DBX  320.7
      O     DBX  118.6
      O     DBX    9.1
      JC    REST

      S     #tmpFin
      S     DBX [AR1,P#0.0]
      JU    END

REST: R     #tmpFin
      R     DBX [AR1,P#0.0]
      R     DBX  320.7
      L     0
      T     DBB   16
      JU    END

STRT: NOP   0
NETwork3
      L     W#16#0
      L     DBB   16
      <>I  
      JC    D000
      L     1
D000: T     #tmpCounterInput
      L     10
      ==I  
      S     DBX    9.7
      JC    END
      TAK  

NETword4:
     
L     W#16#0
      L     DBB   16
      <>I  
      JC    D000
      L     1
D000: T     #tmpCounterInput
      L     10
      ==I  
      S     DBX    9.7
      JC    END
      TAK  

NETword5
     
L     #tmpCounterInput
      L     1
      -I    
      L     10
      *I    
      L     150
      +I    
      SLD   3
      LAR1  

      L     #tmpCounterInput
      L     1
      -I    
      L     6
      *I    
      L     250
      +I    
      SLD   3
      LAR2  

NETword6:
 
A(    
      L     #Command
      L     B#16#49
      ==I  
      )    
      O(    
      L     #Command
      L     B#16#69
      ==I  
      )    
      JCN   F001
      L     W#16#8000
      T     #tmpMDSAddress
      L     B#16#3
      T     #tmpCommand_r_w_i
      JU    F003
F001: A(    
      L     #Command
      L     B#16#52
      ==I  
      )    
      O(    
      L     #Command
      L     B#16#72
      ==I  
      )    
      JCN   F002
      L     B#16#2
      T     #tmpCommand_r_w_i
      JU    F003
F002: A(    
      L     #Command
      L     B#16#57
      ==I  
      )    
      O(    
      L     #Command
      L     B#16#77
      ==I  
      )    
      JCN   G000
      L     B#16#1
      T     #tmpCommand_r_w_i

F003: A     #Last
      O     #PointerCommand
      JC    F004

      L     #tmpCommand_r_w_i
      L     W#16#40
      +I    
      T     #tmpCommand_r_w_i

F004: T     DBB [AR1,P#0.0]
      L     #Length
      T     DBW [AR1,P#2.0]
      L     #tmpMDSAddress
      T     DBW [AR1,P#4.0]
      L     #tmpDataDbNo
      T     DBW [AR1,P#6.0]
      L     #AddressInDBData
      T     DBW [AR1,P#8.0]

      AN    #PointerCommand
      JC    G000

      A     #PointerCommand
      =     DBX [AR2,P#0.0]
      L     #LengthPointer
      T     DBW [AR2,P#2.0]
      L     #AddressInDBDataPointer
      T     DBW [AR2,P#4.0]

NETword7：

G000: A     #Last
      JC    G001
      L     #tmpCounterInput
      +     1
      T     DBB   16
      JU    END

G001: L     W#16#0
      T     DBB   16
      L     DBW   18
      +     -1
      T     DBW   20
      =     DBX  320.0

NETwork8:
   
     END:  OPN   DB [#tmpDBNO]
                 OPN   DI [#tmpDINO]
                  A     #tmpFin
                  =     #Fin
                LAR1  #tmpSaveAR1
      LAR2  #tmpSaveAR2

      SET  
      SAVE  

这是个被调用 的程序，我想请问哈最前面的TAR1，TAR2指令起什么作用，把什么数传送到累加器了，L   DBNO,     L     DINO   又是装载的那些数据块编号（因为并没有对背景数据块进行操作）？