home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / windows / w3_bbs.zip / RDB.BAT < prev    next >
DOS Batch File  |  1990-11-10  |  2KB  |  159 lines
  1. :START
  2.  if BAD==%BAUD% goto bc
  3.  if Tame==1 goto DB
  4.  if 1==%live% goto Wildcat
  5.  if 2==%live% goto returncat
  6.  
  7. :DB
  8.  set live=
  9.  set baud=
  10.  set Time=
  11.  H:
  12.  cd \db
  13.  break ON
  14.  verify OFF
  15.  H:\db\db
  16.  if errorlevel 253 goto CLEANUP
  17.  if errorlevel 140 goto EXIT
  18.  if errorlevel 100 goto LOCOCAT
  19.  if errorlevel 96 goto LDBBS
  20.  IF ERRORLEVEL 90 GOTO FILELIST
  21.  if errorlevel 80 goto SMLNET
  22.  if errorlevel 50 goto LIVE
  23.  if errorlevel 35 goto MAKEWILD
  24.  if errorlevel 32 goto AFTER
  25.  if errorlevel 31 goto bundles
  26.  if errorlevel 0 goto START
  27.  goto START
  28.  
  29. :LDBBS
  30. BBS.BAT
  31.  
  32. :OPEN
  33. goto START
  34.  
  35. :WILDCAT
  36. set LIVE=
  37. c:
  38. cd \wildcat
  39. c:\wildcat\wildcat /B %baud% %Time%
  40.  if errorlevel 60 goto sofar
  41.  if errorlevel 50 goto live
  42.  if errorlevel 40 goto DROP2DOS
  43.  if errorlevel 35 goto QBBSMAIL
  44.  if errorlevel 32 goto bundles
  45.  if errorlevel 20 goto START
  46.  if errorlevel 18 goto START
  47.  if errorlevel 16 goto START
  48.  if errorlevel 14 goto START
  49.  if errorlevel 12 goto START
  50.  if errorlevel 10 goto START
  51.  if errorlevel 8 goto START
  52.  if errorlevel 4 goto START
  53.  if errorlevel 2 goto START
  54.  if errorlevel 0 goto END
  55.  goto START
  56.  
  57. :RETURNCAT
  58.  c:
  59.  cd \wildcat
  60.  set LIVE=
  61.  c:
  62.  c:\wildcat\wildcat
  63.  if errorlevel 60 goto START
  64.  if errorlevel 50 goto LIVE
  65.  if errorlevel 40 goto DROP2DOS
  66.  if errorlevel 35 goto QBBSMAIL
  67.  if errorlevel 0 goto END
  68.  goto START
  69.  
  70. :DROP2DOS
  71. c:
  72. cd \wildcat
  73. call dropdos.bat
  74. goto END
  75.  
  76.  
  77. :LIVE
  78. C:
  79. cd \wildcat
  80. call door.bat
  81. goto RETURNCAT
  82.  
  83. :QBBSMAIL
  84. echo OFF
  85. C:
  86. cd \WILDCAT\smlnet
  87. wc20rbbs wc20rbbs.cfg
  88. smlnet %1
  89. if exist dorinfo1.def del dorinfo1.def
  90. goto RETURNCAT
  91.  
  92. :LOCOCAT
  93.  c:
  94.  cd \wildcat
  95.  c:\wildcat\wildcat /B LOCAL
  96.  if errorlevel 60 goto START
  97.  if errorlevel 50 goto LIVE
  98.  if errorlevel 40 goto DROP2DOS
  99.  if errorlevel 35 goto QBBSMAIL
  100.  if errorlevel 0 goto END
  101.  goto START
  102.  
  103. :AFTER
  104. H:
  105. cd \db
  106. c:
  107. cd \wildcat\small
  108. smlmport c:\wildcat\small\smlnet.cfg
  109. H:
  110. cd \db
  111. goto START
  112.  
  113. :CLEANUP
  114. AT h1m0 2
  115. H:
  116. cd \db
  117. CALL RENUMBER.BAT
  118. CALL S-PRO!.BAT
  119. CALL EVENT.BAT
  120. F:
  121. CD\PCKWIK
  122. PCKPDISK /R:G
  123. C:
  124. goto START
  125.  
  126. :MAKEWILD
  127. C:
  128. cd \wildcat
  129. makewild
  130. goto START
  131.  
  132. :SOFAR
  133. cd \wildcat
  134. bbsansi
  135. bbsasci
  136. copy hello9.* c:\wildcat\display
  137. goto START
  138.  
  139. :bundles
  140. verify OFF
  141. c:
  142. at m1h0 2
  143. h:
  144. cd \db\files
  145. if exist h:\db\files\*.tic gosub wcflfwrd
  146. cd ..
  147. goto start
  148.  
  149. :wcflfwrd
  150. h:\db\wcfl.exe 
  151. return
  152.  
  153. :FILELIST
  154. CALL FILELIST.BAT
  155.  
  156.  
  157. :END
  158.  
  159.