home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / 6 / 6pakbats.zip / PCBSZ.BAT < prev    next >
DOS Batch File  |  1993-02-28  |  1KB  |  43 lines
  1. @echo off
  2. if exist pcberr.fil del pcberr.fil
  3. if exist pcbdsz.log del pcbdsz.log
  4. if exist sort.txt del sort.txt
  5. if "%3"=="@C:PCBDSZ.LST" GOTO BATCH
  6. if "%3"=="C:\pcb\kmail\KWORK\ONESTOP.QWK" goto kmail
  7. GOTO SINGLE
  8.  
  9.  
  10. :SINGLE
  11. COPY %3 E:\TEMP%NODE%
  12. GOTO LOGOS
  13.  
  14. :BATCH
  15. SORT < PCBDSZ.LST > SORT.TXT
  16. TYPE C:\PCB\END.TXT >> SORT.TXT
  17. CDCOPY E %NODE% < SORT.TXT
  18. GOTO LOGOS
  19.  
  20. :LOGOS
  21. FOR %%G IN (E:\TEMP%NODE%\*.GIF) DO CPASTE C:\PCB\COMMENT.EXT %%G
  22. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO PKZIP -a %%Z C:\PCB\BBSAD.TXT
  23. FOR %%A IN (E:\TEMP%NODE%\*.ARJ) DO ARJ a -we:\temp -jh2048 %%A C:\PCB\BBSAD.TXT
  24. FOR %%L IN (E:\TEMP%NODE%\*.LZH) DO LHA a %%L C:\PCB\BBSAD.TXT
  25. FOR %%S IN (E:\TEMP%NODE%\*.ZIP) DO STRIPZIP %%S
  26. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO ZIPLOGO %%Z
  27. GOTO SEND
  28.  
  29. :SEND
  30. DSZ handshake both pB2048 estimate 0 %5 z sz E:\Temp%NODE%\*.*
  31. GOTO CLEANUP
  32.  
  33. :CLEANUP
  34. if exist pcbdsz.lst del pcbdsz.lst
  35. if exist sort.txt del sort.txt
  36. For %%D In (E:\Temp%NODE%\*.*) DO Del %%D
  37. goto end
  38.  
  39. :kmail
  40. dsz handshake both pB1024  estimate 0 %5 z sz %3
  41.  
  42. :end
  43.