AT2k Design BBS Message Area
Casually read the BBS message area using an easy to use interface. Messages are categorized exactly like they are on the BBS. You may post new messages or reply to existing messages!

You are not logged in. Login here for full access privileges.

Previous Message | Next Message | Back to VBBS/VADV How-To  <--  <--- Return to Home Page
   Networked Database  VBBS/VADV How-To   [555 / 1099] RSS
 From   To   Subject   Date/Time 
Message   Steve Winn    Lews   Batch file help   April 17, 2009
 10:37 AM  

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


:Process
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]
  Show ANSI Codes | Hide BBCodes | Show Color Codes | Hide Encoding | Hide HTML Tags | Show Routing
Previous Message | Next Message | Back to VBBS/VADV How-To  <--  <--- Return to Home Page

VADV-PHP
Execution Time: 0.0181 seconds

If you experience any problems with this website or need help, contact the webmaster.
VADV-PHP Copyright © 2002-2024 Steve Winn, Aspect Technologies. All Rights Reserved.
Virtual Advanced Copyright © 1995-1997 Roland De Graaf.
v2.1.241108