home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / 6 / 6pakbats.zip / PCBSG.BAT < prev    next >
DOS Batch File  |  1993-02-28  |  956b  |  39 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. GOTO SINGLE
  7.  
  8.  
  9. :SINGLE
  10. COPY %3 E:\TEMP%NODE%
  11. GOTO LOGOS
  12.  
  13. :BATCH
  14. SORT < PCBDSZ.LST > SORT.TXT
  15. TYPE C:\PCB\END.TXT >> SORT.TXT
  16. CDCOPY E %NODE% < SORT.TXT
  17. GOTO LOGOS
  18.  
  19. :LOGOS
  20. FOR %%G IN (E:\TEMP%NODE%\*.GIF) DO CPASTE C:\PCB\COMMENT.EXT %%G
  21. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO PKZIP -a %%Z C:\PCB\BBSAD.TXT
  22. FOR %%A IN (E:\TEMP%NODE%\*.ARJ) DO ARJ a -we:\temp -jh2048 %%A C:\PCB\BBSAD.TXT
  23. FOR %%L IN (E:\TEMP%NODE%\*.LZH) DO LHA a %%L C:\PCB\BBSAD.TXT
  24. FOR %%S IN (E:\TEMP%NODE%\*.ZIP) DO STRIPZIP %%S
  25. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO ZIPLOGO %%Z
  26. GOTO SEND
  27.  
  28. :SEND
  29. dsz handshake both pB2048  estimate 0 %5 sb -g E:\Temp%NODE%\*.*
  30. GOTO CLEANUP
  31.  
  32. :CLEANUP
  33. if exist pcbdsz.lst del pcbdsz.lst
  34. if exist sort.txt del sort.txt
  35. For %%D In (E:\Temp%NODE%\*.*) DO Del %%D
  36. goto end
  37.  
  38. :end
  39.