@echo off
if exist pcbpass.txt del pcbpass.txt
if exist pcbfail.txt del pcbfail.txt
rem if %@ext[%1]==gif goto gif          <-- 4DOS commands, faster than TESTFILE
rem if %@ext[%1]==zip goto zip          <-- 4DOS commands, faster than TESTFILE
testfile gif zip
if errorlevel == 2 goto gif
if errorlevel == 1 goto zip
goto crc

:gif
if %2 == test goto gift
giftest %1 /B:2/F:%3 > PCBPASS.TXT
if errorlevel == 25 goto badgif
if errorlevel == 20 goto badgif
if errorlevel == 10 goto end
if errorlevel == 1 goto badgif
goto end

:gift
echo Testing GIF file...
> PCBPASS.TXT
giftest %1 /E/B:2/F:%3
if not exist %1 goto badgif
goto end

:badgif
move PCBPASS.TXT PCBFAIL.TXT /Q
goto end

:zip
ptest %1 ptest.cfg
if %2 == test goto end
if exist pcbfail.txt goto end

pcbdiz %1 %3 /AV/D/U

:crc
if exist pcbpass.txt del pcbpass.txt
rem proecho 1 ~Adding %@name[%1] to CRC database...
zdcsfc %1 %2 %3
goto end

:end
if exist PCBPASS.TXT type PCBPASS.TXT >> f:\pcb\PCBPASS.LOG
if exist PCBFAIL.TXT type PCBFAIL.TXT >> f:\pcb\PCBFAIL.LOG
if exist PCBFAIL.TXT move %1 h:\hold /q
if exist %3 type %3 >> f:\pcb\desc
