home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / PROGRAMM / BUILDER.ZIP / FS.BLD < prev    next >
Text File  |  1992-11-17  |  580b  |  29 lines
  1. ' FS.BLD
  2. '
  3. ' FS gives you the total size of any file or group of files
  4. ' listed on the command line.
  5. '
  6. ' To use it, enter this at the DOS command line:
  7. '
  8. '    fs <filespec>
  9. '
  10. ' Where <filespec> is a filename or wildcard specification.
  11.  
  12. ' If you omit a file specification, it uses *.*
  13. '
  14. ' Examples:
  15. '
  16. '    fs *.exe
  17. '    fs  acct1.wks
  18.  
  19. ' Set aside memory for the count of file sizes.
  20. longint FSize
  21. ' If user didn't specify any files, use *.*
  22. if ParamCount < 2
  23.   FSize := FileSize "*.*"
  24.   
  25. end else
  26.   FSize := FileSize "%1"
  27. end
  28. say FSize; " total bytes."
  29.