home *** CD-ROM | disk | FTP | other *** search
/ synchro.net / synchro.net.tar / synchro.net / modem.madness / SMMNETML / POPBATS.ZIP / SPAWNBBS.BAT < prev   
Encoding:
DOS Batch File  |  1993-03-03  |  2.1 KB  |  96 lines

  1. echo off
  2. d:
  3. Rem Make sure the network is all set up properly
  4. call netset
  5. Rem Set environment variables for all the multinode stuff
  6. Rem tell schat! where the BBS main directory is.
  7. set schat!=d:\qbbs
  8. Rem Tell DSZ what port to use (for XRDOOR)
  9. set bnuport=1
  10. Rem Set a variable to hold the baud rate (used as a switch and to allow a relog)
  11. set baud=%1
  12. Rem Lets me do an emergency restart if I have to reboot for some reason.
  13. Rem By doing an EXEBBS RESTART
  14. if %baud%==restart goto restart_quick
  15. :top
  16. Rem This line gets called for ALL remote logons.
  17. cd\qbbs
  18.    if %baud%==local goto local_quick
  19.    quickbbs -b%baud% -e0 -t%3 -m%6
  20.    goto after_quick
  21.    
  22. :local_quick
  23. Rem Log onto the BBS from a function key drop to DOS from the mailer.
  24.    cd\qbbs
  25.    quickbbs -l -e0
  26.    goto after_quick
  27.    
  28. :restart_quick
  29. Rem Reload the BBS after a type 15 exit.
  30.    d:
  31.    cd\qbbs
  32.    quickbbs -r -e0
  33.    
  34. :after_quick
  35.    if errorlevel  7 goto relog
  36.    if errorlevel  6 goto outside
  37.    if errorlevel  5 goto net&echo
  38.    if errorlevel  4 goto echo_only
  39.    if errorlevel  3 goto net_only
  40.    goto out
  41.    
  42. :outside
  43. Rem Call the batch file to run doorway for remote maint.
  44.    echo off
  45.    command.com /c d:\bat\outside.bat /d:512 
  46.    goto restart_quick
  47.    
  48. :relog
  49. Rem Allow a user to log into the system again.  Allows more than one account
  50. Rem per call.
  51.    cd\qbbs
  52.    goto top
  53.    
  54. :net&echo
  55.    rem fall through to echo_only
  56.    
  57. :echo_only
  58. Rem This calls DVEXEC if in DV and scans for mail.  Falls through
  59. rem if not in DV and still does the scan.
  60.    BNU/U
  61.    echo ATH1&D0 > com1:
  62.    beep 10 25
  63.    echo ATH1&D0 > COM1:
  64.    call mscan.bat
  65.    goto out
  66.    cd\qbbs
  67.    qecho -e -a
  68.    goto out
  69.  
  70. :net_only
  71. Rem Same as above.
  72.    BNU/U
  73.    echo ATH1&D0 > com1:
  74.    beep 10 25
  75.    echo ATH1&D0 > COM1:
  76.    call mscan.bat
  77.    goto out
  78.    cd\qbbs
  79.    mailscan
  80.    del netmail.bbs
  81.    
  82. :out
  83.  
  84. :get_out
  85. Rem Return to run.bat
  86.    BNU/U
  87.    echo ATH1&D0 > com1:
  88.    beep 10 25
  89.    echo ATH1&D0 > COM1:
  90.    cd\qbbs
  91.    uplog
  92.    qguest
  93.    cd\
  94.    bnu /z2 /R:4096 /T:512 /l0:38400
  95.  
  96.