home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / BBS.ARJ / BBS / RUNBBS.BAT
Encoding:
DOS Batch File  |  1996-03-30  |  2.3 KB  |  124 lines
  1. @ECHO OFF
  2. x00 e 1=2f8,3 B,1,38400 R=4096 T=4096
  3. xu fifo:16
  4. :START
  5.   cls
  6.   CD\BBS\BT
  7.   move /y \files\mailgate\*.* \bbs\inbound
  8.   copy \bbs\outbound\*.d?? \bbs\outbound\*.h?? /y
  9.   copy \bbs\outbound\*.cut \bbs\outbound\*.hut /y
  10.   del \bbs\outbound\*.d??
  11.   del \bbs\outbound\*.cut
  12.   del \bbs\outbound\*.bsy
  13.   BT
  14.   If ErrorLevel 384 goto BBS
  15.   if ErrorLevel 255 goto FAXIN
  16.   If ErrorLevel 192 goto BBS
  17.   If ErrorLevel 144 goto BBS
  18.   if ErrorLevel 120 goto BBS
  19.   if ErrorLevel 101 goto FILELIST
  20.   IF ERRORLEVEL 100 GOTO BBS_Local
  21.   If ErrorLevel 96 goto BBS
  22.   IF ERRORLEVEL 90 GOTO TOP15s
  23.   IF ERRORLEVEL 80 GOTO AMAX
  24.   If ErrorLevel 72 goto BBS
  25.   IF ERRORLEVEL 70 GOTO Golded
  26.   IF ERRORLEVEL 65 GOTO NOTHING
  27.   IF ERRORLEVEL 64 GOTO BBS
  28.   IF ERRORLEVEL 60 GOTO UNPACKMAIL
  29.   IF ERRORLEVEL 50 GOTO NET&ECHO
  30.   If ErrorLevel 48 goto BBS
  31.   IF ERRORLEVEL 40 GOTO MSG_PACK
  32.   If ErrorLevel 24 goto BBS
  33.   IF ERRORLEVEL 20 GOTO NOTHING
  34.   IF ERRORLEVEL 12 GOTO BBS
  35.   IF ERRORLEVEL 10 GOTO NOTHING
  36.   IF ERRORLEVEL  3 GOTO RUNGECHO
  37.   IF ERRORLEVEL  1 GOTO EXIT
  38.   GOTO START
  39.  
  40. :RUNGECHO
  41.   XCOPY \BBS\INBOUND \BBS\MSG
  42.   cd\bbs\gecho
  43.   gecho scan pack toss import mgr notify -force
  44.   cd\bbs\bt
  45.   ommm -sA
  46.   GOTO START
  47.  
  48. :FILELIST
  49.   \BBS\RA\RAFILE FILELIST FILES.BBS
  50.   COPY FILES.BBS \FILES\GWBBS /Y 
  51.   CD\BBS\RAUSM
  52.   RAUSM > NUL
  53.   CD\BBS\ra
  54.   ramsg purge
  55.   ramsg pack
  56. rem   cd\bbs\gecho
  57. rem   gecho scan pack toss import mgr notify -force
  58. rem   mbutil pack
  59.   GOTO UNPACKMAIL
  60.  
  61. :BBS
  62.   call bbsbatch.bat
  63.   cd\bbs\gecho
  64.   goto start
  65.  
  66. :AMAX
  67.   CD\BBS\AMAX
  68.   CALL MAX
  69.   GOTO START
  70.  
  71. :Golded
  72.   CD\bbs\golded
  73.   golded
  74.   cd\bbs\gecho
  75. rem   mbutil purge -Days 30 -Rcvd 30
  76.   gecho scan pack toss import mgr notify -force
  77.   GOTO START
  78.  
  79. :NOTHING
  80.   GOTO START
  81.  
  82. :MSG_PACK
  83.   CD\BBS\GECHO
  84.   MBUTIL -PACK
  85.   GOTO START
  86.  
  87. :NET&ECHO
  88.   CD\BBS\gecho
  89.   gecho scan pack
  90.   GOTO BUNDLE
  91.  
  92. :ECHO_MAIL
  93.   CD\BBS\gecho
  94.   gecho scan pack
  95.   GOTO BUNDLE
  96.  
  97. :NET_MAIL
  98.   CD\BBS\gecho
  99.   gecho scan pack
  100.   GOTO BUNDLE
  101.  
  102. :UNPACKMAIL
  103.   XCOPY \BBS\INBOUND \BBS\MSG
  104.   CD\BBS\gecho
  105.   mbutil purge -Days 40 -Rcvd 40
  106.   gecho scan pack mgr toss import notify -force
  107.   cd\bbs\bt
  108.   ommm -sA
  109.  
  110. :BUNDLE
  111. goto start
  112.  
  113. :BBS_Local
  114.   cd\bbs\ra
  115.   ra -l
  116.   goto start
  117.  
  118. :EXIT
  119.   CD\BBS
  120.   ECHO
  121.   ECHO Down .......
  122.   ECHO ON
  123.  
  124.