home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
BBS
/
TPB71TXT.ZIP
/
RUNFD.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-12-10
|
3KB
|
211 lines
;typical runfd.bat file (I stripped mine down a bit)
echo off
:loop
c:
cd\fd
FD
if errorlevel 241 goto inmail ;make sure that you add these
if errorlevel 247 goto tsetup ;errorlevels to FrontDoor setup
if errorlevel 240 goto outmail ;also make changes to baud rate
if errorlevel 230 goto renum ;errorlevels is same setup, lastly
if errorlevel 220 goto weekly ;change setting from mail only to
if errorlevel 210 goto daily ;BBS
if errorlevel 202 goto viewlog
if errorlevel 201 goto editor
if errorlevel 200 goto TPBlocal
if errorlevel 104 goto bbs ;exit to BBS at 9600
if errorlevel 103 goto bbs ;exit to BBS at 2400
if errorlevel 102 goto bbs ;exit to BBS at 1200
if errorlevel 101 goto bbs ;exit to BBS at 300 (ugh)
if errorlevel 10 goto userbrk
if errorlevel 4 goto fatal
if errorlevel 3 goto dspace
if errorlevel 1 goto fatal
:bbs
c:
cd\fd
dobbs
if errorlevel 3 goto outmail
if errorlevel 2 goto outmail
if errorlevel 1 goto netmail
goto loop
:viewlog
c:
cd\tpb
viewlog c:\tpb\log1.bb#
goto loop
:Ned
c:
cd\tpb
ned
goto loop
:tpbthrough
cls
c:
cd\fd
if errorlevel 3 goto outmail
if errorlevel 2 goto outmail
if errorlevel 1 goto netmail
goto loop
:inmail
c:
cd\fd
tosscan toss
if not exist import.xyz goto loop
tosscan scan
if errorlevel goto tosserr
c:
cd\tpb
impmsgs -i -k -n -l
goto loop
:outmail
c:
tosscan scan
cd\fd
if errorlevel goto tosserr
goto loop
:domail
c:
cd\fd
tosscan toss
if not exist import.xyz goto loop
if errorlevel goto tosserr
cd\tpb
impmsgs -i -k -n -l
c:
cd\fd
tosscan scan
if errorlevel goto tosserr
goto loop
:tsetup
c:
cd\fd
tsetup
goto loop
:renum
c:
cd\tpb
impmsgs -rn
cd\fd
goto loop
:weekly
c:
cd c:\mail\files
if not exist nodediff.a?? goto loop
copy nodediff.* c:\fd\nodelist
cd c:\fd\nodelist
pak e nodediff.a??
listupdt
fdnc /f
goto loop
:daily
c:
cd\tpb
c:
cd\mail
dofw
if errorlevel 6 goto Saturday
if errorlevel 5 goto Friday
if errorlevel 4 goto Thursday
if errorlevel 3 goto Wednesday
if errorlevel 2 goto Tuesday
if errorlevel 1 goto Monday
if errorlevel 0 goto Sunday
:Sunday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:Monday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:Tuesday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:Wednesday
c:
cd\tpb
copy daily.mac macro.lst
tpb 98
goto reboot
:Thursday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:Friday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:Saturday
c:
cd\tpb
copy weekly.mac macro.lst
tpb 98
goto reboot
:reboot
c:
cd\tpb
watch 1 +
goto loop
:TPBlocal
c:
cd\tpb
e:\tpb 99
goto tpbthrough
:tosserr
cls
echo Tosserr
goto loop
:userbrk
cls
echo User break.
goto done
:dspace
cls
echo FrontDoor reported insufficient disk space
c:
cd\tpb
copy space.mac macro.lst
tpb 98
copy daily.mac macro.lst
goto loop
:fatal
cls
echo FATAL error reported by FrontDoor.
boot
:done