/* INCACHE EXEC - DISPLAY THE ADDRESSES THAT CACHE MAGIC IS */           
/*                CURRENTLY CACHING.                        */           
                                                                         
'pipe (name incache endchar $)',                                         
   ' cp q n',                 /* Get user information                 */ 
   '|split /,/',              /* Split into single lines              */ 
   '|strip',                  /* Remove leading blanks                */ 
   '|loc x4A',                /* Only keep cache magic info           */ 
   '|hexsort',                /* Sort it by real address              */ 
   '|spec 2-5 1',             /* Only keep real address               */ 
   '| a: fanout',             /* Send input stream to other           */ 
   '|pad 8',                  /* Pad the address                      */ 
   '|join 9',                 /* Put 10 addresses in a row            */ 
   '|buffer',                 /* Wait until second stage pipe is done */ 
   '|console',                /* Send data to the console             */ 
   '$',                                                                  
'a:',                                                                    
   '|count lines',            /* Total the number of devices cached   */ 
   '|spec 1-* 1 /drives are currently being cached. / nw',               
   '|console'                 /* Send data to the console             */ 

    Source: geocities.com/vmvse/files

               ( geocities.com/vmvse)