home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / BLUEQ155.ZIP / SR140.RDR / PACKER.BAT next >
Encoding:
DOS Batch File  |  1994-09-15  |  1.0 KB  |  62 lines
  1. @echo off
  2. rem packer compress.exe reply_fname internals
  3.  
  4. rem * These lines creates BLUEQWK.CFG in D:\SR\, change path to suit your needs
  5. echo .\ >        D:\SR\BLUEQWK.CFG
  6. echo .\BQWRK\ >> D:\SR\BLUEQWK.CFG
  7.  
  8. if (%1)==(PKZIP) goto PK
  9. if (%1)==(PKPAK) goto PKPAK
  10. if (%1)==(LHA) goto LHA
  11. if (%1)==(ARJ) goto ARJ
  12.  
  13. :PK
  14. if (%5)==() goto PACK
  15. md BQWRK >nul
  16. copy %5 BQWRK >nul
  17. del %5 >nul
  18. blueqwk %4 rep-bw
  19. cls
  20. %1 %2 %3 %4 BQWRK\*.* %6 %7 %8 %9
  21. goto CLEANUP
  22.  
  23. :PKPAK
  24. if (%4)==() goto PACK
  25. md BQWRK >nul
  26. copy %4 BQWRK >nul
  27. del %4 >nul
  28. blueqwk %3 rep-bw
  29. cls
  30. %1 %2 %3 BQWRK\*.* %5 %6 %7 %8 %9
  31. goto CLEANUP
  32.  
  33. :ARJ
  34. if (%7)==() goto PACK
  35. md BQWRK >nul
  36. copy %7 BQWRK >nul
  37. del %7 >nul
  38. blueqwk %6 rep-bw
  39. cls
  40. %1 %2 %3 %4 %5 %6 BQWRK\*.* %8 %9
  41. goto CLEANUP
  42.  
  43. :LHA
  44. if (%5)==() goto PACK
  45. md BQWRK >nul
  46. copy %5 BQWRK >nul
  47. del %5 >nul
  48. blueqwk %4 rep-bw
  49. cls
  50. %1 %2 %3 %4 BQWRK\*.* %6 %7 %8 %9
  51. goto CLEANUP
  52.  
  53. :CLEANUP
  54. echo y|del BQWRK\*.* >nul
  55. rd BQWRK >nul
  56. goto END
  57.  
  58. :PACK
  59. %1 %2 %3 %4 %5 %6 %7 %8 %9
  60.  
  61. :END
  62.