@echo off
rem ZipLab Plus - FileDoor Interface batch
rem by Mike Ehlert 1:102/1001
rem Version 2.0
rem
rem Read the ZLAB-RA.DOC that came with this batch for more info.
rem
rem This will assume the enviornment variable %NODE% is set to the current
rem node number. For example "Set NODE=1" for line1, and so on.
rem If you don't run multinode, then you can replace "%NODE%" with "1"
rem
rem
rem First convert the RA DORINFO1.DEF to PCBOARD.DAT and PCBOARD.SYS files
rem and tack on lines 153-198 to make it an extended PCBOARD.DAT file.
qkdoor c:\ra\line%NODE%\RA c:\ra\line%NODE%\PCB14
copy c:\ra\line%NODE%\pcboard.dat+c:\ra\ziplab\add.%NODE% c:\ra\line%NODE%\pcboard.dat
Rem Be sure the PCBDOOR variable is set as PRODOOR so ZipLab plus is happy.
Set PCBDOOR=PRODOOR
rem Check which archive types are there, and for each type of archive type
rem found, loop running ZipLab-Plus (ptest.exe) once for each filename.
rem Looping is done with the for/in statement, which calls the ZipLab-Plus
rem program (ptest.exe) once for each matching filename, passing the dir
rem and filename with it.
rem This is done for all the ZIP, ARJ and LZH files found in the temp upload
rem directory. If there any GIF files a for/in loop runs GIFTEST.EXE on them.
if not exist %1\*.* goto done
if exist %1\*.GIF for %%1 in (*.gif) c:\system\giftest.exe /E /I
if exist %1\*.ZIP for %%1 in (*.zip) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
if exist %1\*.ARJ for %%1 in (*.arj) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
if exist %1\*.LZH for %%1 in (*.lzh) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
rem Remove temporary flag file, FileDoor does not care for a result anyhow.
if exist pcbfail.txt erase pcbfail.txt
Rem May as well free up the enviornment by a few bytes...
Set PCBDOOR=
Rem Thats it, now its back to FileDoor.