[net.micro.amiga] command file to list volume contents

edds@unc.UUCP (Tom Edds) (07/31/86)

  <. .>

   
  Having trouble remembering which disk you put that important file on 
last week? 

   My quick & dirty fix for this is to use the command file below to
print the directory, and then to stick all these pages in a notebook. 
This provides a reasonably quick method of finding things, assuming that
my listings are current. (a strong assumption most of the time!).

  A more intelligent approach to this problem would be a disk catalog. 
I've seen two advertised.  Has anyone tried either of these yet? I'd be
interested (as would othernetters) in reports of finds and features, as
well as failures.  What do these programs do? What don't they do? I've
really found the reviews on Usenet helpful when it comes to investing my
software $$$.  Thanks to all. 

  So... 

  here is a command file you might find useful.  Stick it in your s:
directory if you use it a lot.  Note that volume names containing blanks
need to be quoted.  Use 8 lpi from Preferences to get 88 lines on each
page.  You need to change the "FF" to a ctrl-L on the last line to get a
page eject, so you can set up a command file to invoke a command file. 
For example, if you have a file called "biglist" that looks something like

    ex listdir AmigaLibDisk01
    ex listdir AmigaLibDisk02
    ex listdir "Metascope 1.11"

you can say  ex biglist  and you'll be prompted for each disk as it's 
needed. 

  Enjoy! 

   Tom Edds
   UNC-CH Psyco Dept.
   ............mcnc!unc!edds


=============== cut here =====================
.Key volname/a,p/s,v/s
;  Print a disk directory.
;  Arguments:  v - verbose mode 
;  Usage:    ex listdir Volname
;  
;  Command file posted to Usenet on 7/29/86 by Tom Edds
;  You may do anything you like with this except sell it.
;  It ain't pretty, but it works.      
;
failat 1
if not exists RAM:t 
  makedir RAM:t
  endif 
if NOT <v$""> EQ ""
  echo "Creating directory listing for <volname>: at " 
  date
  endif 
cd RAM:t
echo > temp1 "Directory listing for <volname>: as of "
date > temp2
cd "<volname>:"
cd RAM:t
info > temp3
dir  > temp4 "<volname>:" opt a
join temp1 temp2 temp3 temp4 as "<volname>.dir"
delete temp? q
if NOT <v$""> EQ ""
  echo "Done; output is in RAM:<volname>.dir."
  endif 
  if NOT <v$""> EQ ""
    echo "This file is being printed."
  endif 
  run copy "<volname>.dir" to PRT: +
  delete "<volname>.dir" q  +
;  change FF below to ctrl-L
  echo > PRT: "FF"
=============== cut here, too ============================