home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / FDW95FAQ.ZIP / RAFD2.BAT < prev    next >
Encoding:
DOS Batch File  |  1994-09-25  |  863 b   |  47 lines
  1. CLS
  2. @Echo off
  3.  
  4. :Initialize
  5.    C:\UTIL\ANSI.COM
  6.    Set DSZPORT=2
  7.    Set DSZLOG=\RA2\DSZ.LOG
  8.    Set FD=C:\FD2
  9.    Set TASK=2
  10.    C:\UTIL\BNU.COM /F /L1:38400 /Z2 /T:2048 /R:2048
  11.    C:\UTIL\FDFIXW4W.COM
  12.    rem C:\UTIL\X00.EXE B,1,38400 T=1024 R=1024 FIFO=8 E
  13.  
  14. :Start
  15.    cls
  16.    CD\RA2
  17.    If exist C:\RA2\DOBBS2.BAT Del C:\RA2\DOBBS2.BAT 
  18.    FD.EXE
  19.    if errorlevel 200 goto BBS
  20.    if errorlevel 103 goto Start
  21.    if errorlevel 101 goto NewMail
  22.    if errorlevel 35 goto local
  23.    if errorlevel 10 goto end
  24.    Goto Start
  25.  
  26. :BBS
  27.    DoBBS2
  28.  
  29. :Local
  30.    RA -L -N2 -E0
  31.    If exist C:\RA2\HSLINK.* Del C:\RA2\HSLINK.*
  32.    If errorlevel 3 goto Scan
  33.    Goto Start
  34.  
  35. :Scan
  36.    FastEcho Scan -N
  37.    FastEcho Pack -RC:\FECHO\ROUTE.FE
  38.    Goto Start
  39.  
  40. :NewMail
  41.    Echo NewMail > C:\FD\FLAGS\NEWMAIL.FLG
  42.    Goto Start
  43.  
  44. :end
  45.    Echo ATM0H1 > COM2
  46.  
  47.