:restart
if exist c:\bbs\gfiles\echotoss.log goto outproc
if exist c:\bbs\gfiles\nettoss.log goto outproc
c:
cd\bbs\binkley
forward
del bbsbatch.bat
bt
c:
cd\bbs\binkley
if exist bbsbatch.bat bbsbatch
if errorlevel 254 goto tag
if errorlevel 100 goto bonk
if errorlevel 90 goto outproc
if errorlevel 80 goto inproc
if errorlevel 10 goto tag
if errorlevel 8 goto clearcount
if errorlevel 7 goto tag
if errorlevel 1 goto tag
goto restart
:inproc
c:
cd\bbs\binkley
if exist c:\inbound\*.fle goto fileecho
if exist c:\inbound\*.tic goto fileecho
goto skiptick
:fileecho
sds2dir -Fc:\bbs\gfiles -Lsds2dir.log
tick >> tick.log
:skiptick
qm toss scan pack -fc:\bbs\tagmail\echo.lst
areafix ec
rem *** this will catch any level greater than 1 and pack again ***
if errorlevel 1 goto needpack
goto skippack
:needpack
qm pack
:skippack
goto restart
:outproc
c:
cd\bbs\binkley
qm scan pack -fc:\bbs\gfiles\echotoss.log
del c:\bbs\gfiles\echotoss.log
del c:\bbs\gfiles\nettoss.log
goto restart
:clearcount
del c:\outbound\*.$$?
goto restart
:bonk
bonk
goto restart
:tag