home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Beijing Paradise BBS Backup
/
PARADISE.ISO
/
software
/
BBSDOORW
/
BLUEQ155.ZIP
/
OLX22.RDR
/
UNPACKER.BAT
< prev
Wrap
DOS Batch File
|
1994-08-12
|
805b
|
47 lines
@echo off
rem unpacker decompressor.exe qwk_fname internals
if (%1)==(PKUNZIP) goto PK
if (%1)==(PKUNPAK) goto PK
if (%1)==(LHA) goto OTHER
if (%1)==(ARJ) goto OTHER
:PK
if (%3)==() goto PKU
md BQWRK >nul
cls
%1 %2 BQWRK\ %4 %5 %6 %7 %8 %9
if exist BQWRK\*.UP? BLUEQWK %2 BW-REP
if exist BQWRK\*.MSG copy BQWRK\*.msg %3*.* >nul
goto CLEANUP
:OTHER
if (%4)==() goto OTHERU
md BQWRK >nul
cls
%1 %2 %3 BQWRK\ %5 %6 %7 %8 %9
if exist BQWRK\*.UP? BLUEQWK %3 BW-REP
if exist BQWRK\*.MSG copy BQWRK\*.msg %4*.* >nul
goto CLEANUP
:PKU
cls
%1 %2 %3 %4 %5 %6 %7 %8 %9
cls
IF EXIST *.INF BLUEQWK %2 BW-QWK
goto END
:OTHERU
cls
%1 %2 %3 %4 %5 %6 %7 %8 %9
cls
IF EXIST *.INF BLUEQWK %3 BW-QWK
goto END
:CLEANUP
echo y|del BQWRK\*.* >nul
rd BQWRK >nul
goto END
:END