Re: Batch file help
Here is my personal batch file I use with argus to process fidonet packets. I
have removed my remmed lines cause there were a ton
@echo off
set dszlog=d:\va\dsz1.log
:Begin
d:
cd\va
if exist BT0.FLG goto End
echo Processing FIDOnet packets ...
:FIDO
d:
cd\va\fido
if exist in0\NODELIST.Z* del NODELIST.* > nul.
if exist in0\NODELIST.Z0* pkunzip.exe -o in0\NODELIST.Z0*
if exist in0\NODELIST.Z1* pkunzip.exe -o in0\NODELIST.Z1*
if exist in0\NODELIST.Z2* pkunzip.exe -o in0\NODELIST.Z2*
if exist in0\NODELIST.Z3* pkunzip.exe -o in0\NODELIST.Z3*
if exist in0\NODELIST.Z4* pkunzip.exe -o in0\NODELIST.Z4*
if exist in0\NODELIST.Z5* pkunzip.exe -o in0\NODELIST.Z5*
if exist in0\NODELIST.Z6* pkunzip.exe -o in0\NODELIST.Z6*
if exist in0\NODELIST.Z7* pkunzip.exe -o in0\NODELIST.Z7*
if exist in0\NODELIST.Z8* pkunzip.exe -o in0\NODELIST.Z8*
if exist in0\NODELIST.Z9* pkunzip.exe -o in0\NODELIST.Z9*
if exist d:\va\fido\in0\GATORLST.* del GATORLST.* > nul.
if exist d:\va\fido\in0\GATORLST.* copy d:\va\fido\in0\GATORLST.* d:\va\fido >
nul.
if exist GATORLST.Z* pkunzip.exe -o GATORLST.Z* GATORLST.* > nul.
if exist GATORLST.Z* del GATORLST.Z* > nul.
if exist in0\FIDO-NA.* copy d:\va\fido\in0\FIDO-NA.* d:\va\data > nul.
if exist in0\FILE-NA.* copy d:\va\fido\in0\FILE-NA.* d:\va\data > nul.
if exist in0\NODEDIFF.A* copy in0\NODEDIFF.A* d:\va\fido > nul.
if exist in0\BACKBONE.NA copy in0\BACKBONE.NA d:\va\data\FIDO-NA.4 > nul.
rem Process any nodediffs...
if not exist NODEDIFF.* goto Tic
cd\xlax
xlaxdiff.exe /O=d:\va\fido /E=d:\va\fido /N=d:\va\fido /A=d:\va\fido
/X=c:\zip\PKUNPAK.EXE,c:\zip\PKPAK.EXE /C
cd\va\fido
if exist NODEDIFF.* del NODEDIFF.* > nul.
rem Upload the nodelist archives.
cd\va
for %%T in (d:\va\fido\NODELIST.A*) do VUPLOAD.EXE /M /FILE=%%T /DB=NODELIST
/DESC=FIDOnet NodeList
rem Update the current nodelist in the file area.
cd\va\fido
pkzip.exe -eX NODELIST.ZIP NODELIST.*
cd\va
if exist d:\va\fido\NODELIST.ZIP VUPLOAD.EXE /M /FILE=d:\va\fido\NODELIST.ZIP
/DB=NODELIST /DESC=Current FIDOnet Nodelist
rem Compile the new nodelist.
cd\va
vfido.exe /nc /nl networkid=4
:Tic
cd\va
if exist fido\in0\*.tic vtic.exe /path=d:\va\fido\in0 /save=d:\va\fido\tics
rocess
echo ... Processing packets ...
cd\va\fido\in0
if not exist *.* goto Exit
cd\va
vfido.exe 0 /r
:Exit
d:
cd\va\fido\in0
if exist *.mft del *.mft > nul.
cd\va
if exist b*.flg del b*.flg > nul.
if exist fido\file_id.diz del fido\file_id.diz > nul.
echo ... Done!
:End
--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]
|