home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.wwiv.com
/
ftp.wwiv.com.zip
/
ftp.wwiv.com
/
pub
/
BBS
/
W3_BBS.ZIP
/
RDB.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-11-10
|
2KB
|
159 lines
:START
if BAD==%BAUD% goto bc
if Tame==1 goto DB
if 1==%live% goto Wildcat
if 2==%live% goto returncat
:DB
set live=
set baud=
set Time=
H:
cd \db
break ON
verify OFF
H:\db\db
if errorlevel 253 goto CLEANUP
if errorlevel 140 goto EXIT
if errorlevel 100 goto LOCOCAT
if errorlevel 96 goto LDBBS
IF ERRORLEVEL 90 GOTO FILELIST
if errorlevel 80 goto SMLNET
if errorlevel 50 goto LIVE
if errorlevel 35 goto MAKEWILD
if errorlevel 32 goto AFTER
if errorlevel 31 goto bundles
if errorlevel 0 goto START
goto START
:LDBBS
BBS.BAT
:OPEN
goto START
:WILDCAT
set LIVE=
c:
cd \wildcat
c:\wildcat\wildcat /B %baud% %Time%
if errorlevel 60 goto sofar
if errorlevel 50 goto live
if errorlevel 40 goto DROP2DOS
if errorlevel 35 goto QBBSMAIL
if errorlevel 32 goto bundles
if errorlevel 20 goto START
if errorlevel 18 goto START
if errorlevel 16 goto START
if errorlevel 14 goto START
if errorlevel 12 goto START
if errorlevel 10 goto START
if errorlevel 8 goto START
if errorlevel 4 goto START
if errorlevel 2 goto START
if errorlevel 0 goto END
goto START
:RETURNCAT
c:
cd \wildcat
set LIVE=
c:
c:\wildcat\wildcat
if errorlevel 60 goto START
if errorlevel 50 goto LIVE
if errorlevel 40 goto DROP2DOS
if errorlevel 35 goto QBBSMAIL
if errorlevel 0 goto END
goto START
:DROP2DOS
c:
cd \wildcat
call dropdos.bat
goto END
:LIVE
C:
cd \wildcat
call door.bat
goto RETURNCAT
:QBBSMAIL
echo OFF
C:
cd \WILDCAT\smlnet
wc20rbbs wc20rbbs.cfg
smlnet %1
if exist dorinfo1.def del dorinfo1.def
goto RETURNCAT
:LOCOCAT
c:
cd \wildcat
c:\wildcat\wildcat /B LOCAL
if errorlevel 60 goto START
if errorlevel 50 goto LIVE
if errorlevel 40 goto DROP2DOS
if errorlevel 35 goto QBBSMAIL
if errorlevel 0 goto END
goto START
:AFTER
H:
cd \db
c:
cd \wildcat\small
smlmport c:\wildcat\small\smlnet.cfg
H:
cd \db
goto START
:CLEANUP
AT h1m0 2
H:
cd \db
CALL RENUMBER.BAT
CALL S-PRO!.BAT
CALL EVENT.BAT
F:
CD\PCKWIK
PCKPDISK /R:G
C:
goto START
:MAKEWILD
C:
cd \wildcat
makewild
goto START
:SOFAR
cd \wildcat
bbsansi
bbsasci
copy hello9.* c:\wildcat\display
goto START
:bundles
verify OFF
c:
at m1h0 2
h:
cd \db\files
if exist h:\db\files\*.tic gosub wcflfwrd
cd ..
goto start
:wcflfwrd
h:\db\wcfl.exe
return
:FILELIST
CALL FILELIST.BAT
:END