有些看不懂

有段程序 有些看不懂  请指教
AN    #IN                         
      JC    m001                        
      L     #PT                         
      L     #ET                         
      <=D                               
      JC    m002                        
      L     DB1.DBW   70                
      +D                                
      T     #ET                         
      L     #PT                         
      >=D                               
m002: =     #Q_ENO                      
      JU    m999                        
m001: L     0                           
      T     #ET                         
      R     #Q_ENO
m999: A     #Q_ENO                      
      SAVE  
      CLR

问题补充：
上面的程序是图片中FC800中的程序 能对照着图片给我解释一下啊吗

图片说明： 1，图片  

佳答案

AN    #IN  //如果in为0，an #in的结果就是1，那么就跳转到m001，否则执行下面的程序
      JC    m001                        
      L     #PT  //如果pt小于等于et则跳转，否则执行下面的程序                       
      L     #ET                         
      <=D                               
      JC    m002                        
      L     DB1.DBW   70                
      +D                                
      T     #ET //et=et+db1.dbw70                        
      L     #PT//如果et大于pt则q_eno为1，否则为0                        
      >=D                               
m002: =     #Q_ENO                      
      JU    m999 //程序执行到这里则跳转到m999                       
m001: L     0                           
      T     #ET  //et=0                       
      R     #Q_ENO//q_eno=0
m999: A     #Q_ENO//这里的程序不全应该还有别的操作                      
      SAVE //保存系统状态位(br=rlo)
      CLR//清除状态位