Commands:                     Updated 2001-10-26                               
                                                                                
DISKDIR [ldev]  ... display directory of LIF files on specified                 
                    disk drive.                                                 
                                                                                
Exit or //      ... terminates program                                          
                                                                                
Help or ?       ... displays this help                                          
                                                                                
TAPEDIR         ... display directory of LIF files on specified                 
                    tape.                                                       
----------------------------------------------------------------                
Note: LIFDIR must reside in a group with PM capability.                         
                                                                                
Sample use:                                                                     
                                                                                
  1) to look at a tape (on ldev 7):                                             
                                                                                
      :run lifdir.pub.allegro; info="tapedir"                                   
                                                                                
         (reply to TAPE with ldev 7)                                            
                                                                                
  2) to look at a disk drive (on ldev 1)                                        
                                                                                
      :run lifdir.pub.allegro; info = "diskdir 1"                               
                                                                                
   LIFDIR: diskdir 1                                                            
                                                                                
   LIF label:                                                                   
      ID        =                                                               
      Name      = HPESYS                                                        
      Directory @ sector 417760 for 8 sectors                                   
      VS        = 00/00/00 @ 00:00:00                                           
      IPLA      @ byte 12288 for 24576                                          
      RS        = $00003100                                                     
                                                                                
   LIF Directory () on raw LDEV 1:                                              
                                                                                
   File# LIF File   File Type      Address Length Vol Created                   
   ----- ---------  -------------- ------- ------ --- ---------                 
       0 MMSAVE     spectrum_ipl       $30    $60   1 99/04/06                  
       1 ISL        spectrum_boot   $65EF0    $F0   1 99/04/06                  
       2 START      spectrum_boot  $38F950  $7568   1 99/04/06                  
   ...                                                                          
      26 AUTOBOOT   spectrum_auto   $66000     $1   1 99/04/06                  
   ...                                                                          
      30 STARTBASE  spectrum_boot  $38F950  $7568   1 99/04/06                  
   # LIF Files =   31                                                           
   The highest sector used by any LIF file is @ $00396eb7                       
                                                                                
                                                                                
  3) to look at a another disk drive (on ldev 2)                                
                                                                                
      :run lifdir.pub.allegro; info = "diskdir 2"                               
                                                                                
   LIFDIR: diskdir 2                                                            
                                                                                
   LIF label:                                                                   
      ID        = T                                                             
      Name      = USER_SET                                                      
      Directory @ sector 0 for 0 sectors                                        
      VS        = 00/00/00 @ 00:00:00                                           
      IPLA      @ byte 0 for 0                                                  
      RS        = $00000000                                                     
                                                                                
   LIF Directory () on raw LDEV 2:                                              
                                                                                
   File# LIF File   File Type      Address Length Vol Created                   
   ----- ---------  -------------- ------- ------ --- ---------                 
   # LIF Files =    0                                                           
                                                                                

20170412