home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / FD_PCB.ZIP / RUNFD.BAT < prev   
DOS Batch File  |  1993-05-26  |  992b  |  42 lines
  1.  
  2. rem     ****************************************************************
  3. rem     * Main FrontDoor batchfile used at The Owl's Nest, NL 2:512/39 *
  4. rem     ****************************************************************
  5.  
  6.  
  7. echo off
  8. :exit
  9.         del endpcb
  10.         if %FD%!==! PATH %PATH%;C:\FD
  11.         if %FD%!==! SET FD=C:\FD
  12.         SET PCB=/SWAP
  13.         SET DSZPORT=1
  14.         if not exist %FD%\FDCOMPNL.NOW goto start
  15.         FDNC /F
  16.         erase %FD%\FDCOMPNL.NOW
  17. :start
  18.         d:
  19.         cd \FD
  20.         X00 E 1 B,0,38400 T=512 R=1024
  21. :loop
  22.         XU CAPTURE
  23.         FD
  24.         if errorlevel 255 goto mailin
  25.         if errorlevel 250 goto bbs
  26.         if errorlevel  10 goto done
  27.         if errorlevel   1 goto err
  28.         goto loop
  29. :mailin
  30.         rem Process received mail here, etc.
  31.  
  32.         goto loop
  33. :err
  34.         echo.
  35.         echo FrontDoor reported error %ERRORLEVEL%
  36.         echo.
  37.         goto done
  38. :bbs
  39.         dobbs0
  40. :done
  41.         X00
  42.