home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / CEL202R.ZIP / CEL202-4.ZIP / CTOSV111.ZIP / FRODO.BAT < prev    next >
DOS Batch File  |  1994-05-10  |  4KB  |  133 lines
  1. rem It Ain't Pretty, But It Works  **Borrowed from The Cel v1.42 Docs**
  2.  
  3. @echo off
  4. Set FD=C:\FD
  5. SET DSZLOG=C:\CELERITY\DSZ.LOG
  6. :LOOP
  7.         CD\FD
  8.         FD
  9.         IF ERRORLEVEL 255 GOTO 38400_BAUD
  10.         IF ERRORLEVEL 192 GOTO 19200_BAUD
  11.         IF ERRORLEVEL 150 GOTO MAILIN
  12.         IF ERRORLEVEL 144 GOTO 14400_BAUD
  13.         IF ERRORLEVEL 120 GOTO 12000_BAUD
  14.         IF ERRORLEVEL  96 GOTO 9600_BAUD
  15.         IF ERRORLEVEL  85 GOTO LOCALBBS
  16.         IF ERRORLEVEL  50 GOTO EXEVENT
  17.         IF ERRORLEVEL  24 GOTO 2400_BAUD
  18.  
  19.         GOTO DONE
  20.  
  21. :38400_baud
  22.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  23.         CD\CELERITY
  24.         CELERITY LINK 38400 38400
  25.         CD\FD
  26.     REM ************** If You Use FastEcho, REM the TosScan line, and Un-Rem
  27.         ************** The FastEcho Lines
  28.         Tosscan SCAN
  29.                 REM     CD FASTECHO
  30.                 REM     FastEcho SCAN
  31.                 REM     FastEcho PACK
  32.         GOTO LOOP
  33.  
  34. :19200_BAUD
  35.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  36.         CD\CELERITY
  37.         CELERITY LINK 38400 19200
  38.         CD\FD
  39.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  40.         ************ The FastEcho Lines
  41.         Tosscan SCAN
  42.                 REM     CD FASTECHO
  43.                 REM     FastEcho SCAN
  44.                 REM     FastEcho PACK
  45.         GOTO LOOP
  46.  
  47. :14400_BAUD
  48.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  49.         CD\CELERITY
  50.         CELERITY LINK 38400 14400
  51.         CD\FD
  52.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  53.         ************ The FastEcho Lines
  54.         Tosscan SCAN
  55.                 REM     CD FASTECHO
  56.                 REM     FastEcho SCAN
  57.                 REM     FastEcho PACK
  58.         GOTO LOOP
  59.  
  60. :12000_BAUD
  61.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  62.         CD\CELERITY
  63.         CELERITY LINK 38400 12000
  64.         CD\FD
  65.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  66.         ************ The FastEcho Lines
  67.         Tosscan SCAN
  68.                 REM     CD FASTECHO
  69.                 REM     FastEcho SCAN
  70.                 REM     FastEcho PACK
  71.         GOTO LOOP
  72.  
  73. :9600_BAUD
  74.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  75.         CD\CELERITY
  76.         CELERITY LINK 38400 9600
  77.         CD\FD
  78.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  79.         ************ The FastEcho Lines
  80.         Tosscan SCAN
  81.                 REM     CD FASTECHO
  82.                 REM     FastEcho SCAN
  83.                 REM     FastEcho PACK
  84.         GOTO LOOP
  85.  
  86. :2400_BAUD
  87.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  88.         CD\CELERITY
  89.         CELERITY LINK 38400 2400
  90.         CD\FD
  91.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  92.         ************ The FastEcho Lines
  93.         Tosscan SCAN
  94.                 REM     CD FASTECHO
  95.                 REM     FastEcho SCAN
  96.                 REM     FastEcho PACK
  97.         GOTO LOOP
  98.  
  99. :LOCALBBS
  100.         SET DSZLOG=C:\CELERITY\DSZ.LOG
  101.         CD\CELERITY
  102.         CELERITY 38400
  103.         CD\FD
  104.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  105.         ************ The FastEcho Lines
  106.         Tosscan SCAN
  107.                 REM     CD FASTECHO
  108.                 REM     FastEcho SCAN
  109.                 REM     FastEcho PACK
  110.         GOTO LOOP
  111.  
  112. :MAILIN
  113.         CD\FD
  114.     REM ************ If You Use FastEcho, REM the TosScan line, and Un-Rem
  115.         ************ The FastEcho Line
  116.         Tosscan TOSS
  117.                 REM     FastEcho TOSS
  118.         CD\CELERITY
  119.         CELERITY TOSS
  120.         GOTO LOOP
  121.  
  122. :EXEVENT
  123.         ECHO FORCING CELERITYNET CALL
  124.         CD\CELERITY
  125.         CELERITY NET
  126.         CALL EVENT1.BAT
  127.         REM OTHER MAINTENANCE STUFF GOES HERE
  128.         GOTO LOOP
  129.  
  130.  
  131. :DONE
  132.  
  133.