home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / ALF20WB.ZIP / ALF.ZIP / ALFPICK.BAT < prev    next >
Encoding:
DOS Batch File  |  1995-11-29  |  645 b   |  23 lines
  1. @echo off
  2. IF "%3"=="2" goto run
  3. %COMSPEC% /E:512 /C%0 %1 %2 2
  4. IF not "%3"=="2" goto out
  5. rem           %1=source %2=dir colour code
  6. :run
  7. if exist %1files.* attrib +H %1files.*
  8. fpick /M%1*.* /Fname /C%2 /P"@set fpick=">junktemp.bat
  9. call junktemp.bat
  10. del  junktemp.bat
  11. if (%fpick%)==(:ESC) echo.
  12. if (%fpick%)==(:ESC) echo You did not pick a file.
  13. if (%fpick%)==(:ESC) goto endit
  14. if (%fpick%)==(:0) echo.
  15. if (%fpick%)==(:0) echo %1*.* not found!
  16. if (%fpick%)==(:0) echo Empty or invalid directory.
  17. if (%fpick%)==(:0) goto endit
  18. echo P%fpick%> \max\alf\alfpick.bbs
  19. :endit
  20. if exist %1files.* attrib -H %1files.*
  21. :out
  22. set fpick=
  23.