Metropoli BBS
VIEWER: pro-t.bat MODE: TEXT (ASCII)
@echo off
echo off
rem -- pro-t.bat - process "test" archive request - for ProDOOR 3.4x
rem -- %1-resultfile, %2 sourcefile

testfile %2 zip lzh gif
if errorlevel == 98 goto cant_handle
if errorlevel == 3 goto gif
if errorlevel == 2 goto lzh
if errorlevel == 1 goto zip
goto end

:gif
giftest %2 >>%1
goto end

:zip
ptest %2 %PCBDRIVE%%PCBDIR%\ptest.cfg
if not exist %2 goto error
goto end

:lzh
ptest %2 %PCBDRIVE%%PCBDIR%\ptest.cfg
if not exist %2 goto error
goto end

:error
echo. >>%1
echo %2 has errors! >>%1
echo %0: Error was detected while processing %2 ! >>%1
goto end

:cant_handle
echo Sorry, %0 does not know how to process %2 ! >>%1

:end
[ RETURN TO DIRECTORY ]