home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / BFE2000P.ZIP / BFE2000P.EXE / SAMPLES / DB / DB_RUN.BAT next >
Encoding:
DOS Batch File  |  1993-10-30  |  7.1 KB  |  364 lines
  1. REM Sample batch file for running BFE under the d'Bridge mailer
  2. REM Thanks to Herb Mellinger for supplying this gem.... :-)
  3. REM See the DBSAMP.ZIP archive for a complete setup running WildCat!
  4. REM under BFE and d'Bridge.
  5.  
  6. echo           **** D'Bridge is coming so have a BALL ****
  7.  
  8.  
  9. echo off
  10.  
  11.           CTTY CON
  12.           set dszlog=G:\robofx\dsz2.log
  13.           set tick=G:\ti\tic.cfg
  14.           set dszport=1
  15.           rem call s.bat
  16.  
  17.  
  18. rem echo          Set Fossil Driver Parameter before we go in....
  19.  
  20.  
  21. rem DEVICEHIGH=C:\X00.SYS E B,0,38400 T=4096 R=4096 F=8
  22.  
  23.  
  24.           F:
  25.           cd\bin
  26.           H:
  27.           cd\gc
  28.           G:
  29.           cd\db
  30.  
  31. :TOP
  32.  
  33. echo: Checking For Tick Files....
  34.  
  35.        if exist G:\db\files\*.tic goto Tick
  36.        cd\
  37.        goto dbridge
  38.  
  39.  
  40.  
  41. :DBRIDGE
  42.   G:
  43.   cd\db
  44.   db.exe
  45.  
  46.   if errorlevel 255 goto TOP
  47.   if errorlevel 193 goto 384BAUD
  48.   if errorlevel 192 goto 192BAUD
  49.   if errorlevel 185 goto ERROR
  50.   if errorlevel 168 goto 168BAUD
  51.   if errorlevel 144 goto 144BAUD
  52.   if errorlevel 120 goto 120BAUD
  53.   if errorlevel 96  goto 96BAUD
  54.   if errorlevel 72  goto 72BAUD
  55.   if errorlevel 50  goto LOCAL
  56.   if errorlevel 48  goto 48BAUD
  57.   if errorlevel 24  goto 24BAUD
  58.   if errorlevel 20  goto EVENT
  59.  
  60.   goto end
  61.  
  62.  
  63.  
  64. :EVENT
  65.  
  66.        CD\DB
  67.        call pack.bat
  68.  
  69.  
  70. :LOCAL
  71.  
  72.         cd\DB\BFE
  73.         BFE -p0 -s0 -cMAIN.CTL MAIN.GBL
  74.         if errorlevel 255 goto TOP
  75.         cd\robofx
  76.         if errorlevel 11 robofx -LOCAL -16COL -NODE 1 -NOSOUND
  77.  
  78.         goto top
  79.  
  80.  
  81.  
  82. rem :384BAUD
  83.        cd\DB\BFE
  84.        BFE -p1 -s38400 -cMAIN.CTL MAIN.GBL
  85.        if errorlevel 255 goto TOP
  86.        if errorlevel 12 goto 384GAP
  87.        if errorlevel 11 goto 384RBO
  88.        goto after_bbs
  89.  
  90. rem :192BAUD
  91.        cd\db\bfe
  92.        BFE -p1 -s19200 -cMAIN.CTL MAIN.GBL
  93.        if errorlevel 255 goto TOP
  94.        if errorlevel 12 goto 192GAP
  95.        if errorlevel 11 goto 193RBO
  96.        goto after_bbs
  97.  
  98. rem :168BAUD
  99.        cd\db\bfe
  100.        BFE -p1 -s16800 -cMAIN.CTL MAIN.GBL
  101.        if errorlevel 255 goto TOP
  102.        if errorlevel 12 goto 168GAP
  103.        if errorlevel 11 goto 168RBO
  104.        goto after_bbs
  105.  
  106. :144BAUD
  107.  
  108.         cd\db\bfe
  109.         BFE -p1 -s14400 -cMAIN.CTL MAIN.GBL
  110.         if errorlevel 255 goto TOP
  111.         if errorlevel 12 goto 144GAP
  112.         if errorlevel 11 goto 144RBO
  113.         goto after_bbs
  114.  
  115. :120BAUD
  116.  
  117.         cd\db\bfe
  118.         BFE -p1 -s12000 -cMAIN.CTL MAIN.GBL
  119.         if errorlevel 255 goto TOP
  120.         if errorlevel 12 goto 120GAP
  121.         if errorlevel 11 goto 120RBO
  122.         goto after_bbs
  123.  
  124. :96BAUD
  125.        
  126.         cd\db\bfe
  127.         BFE -p1 -s9600 -cMAIN.CTL MAIN.GBL
  128.         if errorlevel 255 goto TOP
  129.         if errorlevel 12 goto 96GAP
  130.         if errorlevel 11 goto 96RBO
  131.         goto after_bbs
  132.    
  133. :72BAUD
  134.  
  135.        
  136.         cd\db\bfe
  137.         BFE -p1 -s7200 -cMAIN.CTL MAIN.GBL
  138.         if errorlevel 255 goto TOP
  139.         if errorlevel 12 goto 72GAP
  140.         if errorlevel 11 goto 72RBO
  141.         goto after_bbs
  142.  
  143. :48BAUD
  144.  
  145.         cd\db\bfe
  146.         BFE -p1 -s4800 -cMAIN.CTL MAIN.GBL
  147.         if errorlevel 255 goto TOP
  148.         if errorlevel 12 goto 48GAP
  149.         if errorlevel 11 goto 48RBO
  150.         goto after_bbs
  151.  
  152. :24BAUD
  153.  
  154.         cd\db\bfe
  155.         BFE -p1 -s2400 -cMAIN.CTL MAIN.GBL
  156.         if errorlevel 255 goto TOP
  157.         if errorlevel 12 goto 24GAP
  158.         if errorlevel 11 goto 24RBO
  159.         goto after_bbs
  160.  
  161.  
  162. rem :384GAP
  163.  
  164. rem :384RBO
  165.  
  166. rem :192GAP
  167.  
  168. rem :192RBO
  169.  
  170. rem :168GAP
  171.  
  172. rem :168RBO
  173.  
  174. :144RBO
  175.  
  176. rem             ****************************
  177. rem             * CONNECT 14400 Baud RBO   *
  178. rem             ****************************
  179.  
  180.        cd\robofx
  181.        ROBOFX -LOCK 38400 -BAUD 14400 -16COL -NODE 1 -ONLINE -NOSOUND
  182.        goto after_bbs
  183.  
  184.  
  185. :144GAP
  186.  
  187. rem             **************************
  188. rem             * CONNECT 14400 Baud GAP *
  189. rem             **************************
  190.       cd\gapn1
  191.       gapbbs 38400 0 0 14400 0 0 0
  192.       goto after_bbs
  193.  
  194.  
  195. :120RBO
  196.  
  197. rem             ****************************
  198. rem             * CONNECT 12000 Baud RBO   *
  199. rem             ****************************
  200.  
  201.        cd\robofx
  202.        ROBOFX -LOCK 38400 -BAUD 12000 -16COL -NODE 1 -ONLINE -NOSOUND
  203.        goto after_bbs
  204.  
  205.  
  206. :120GAP
  207.  
  208. rem             ****************************
  209. rem             *   CONNECT 12000 Baud GAP *
  210. rem             ****************************
  211.       cd\gapn1
  212.       gapbbs 38400 0 0 12000 0 0 0
  213.       goto after_bbs
  214.  
  215.  
  216. :96RBO
  217.  
  218. rem             ****************************
  219. rem             *  CONNECT 9600 Baud RBO   *
  220. rem             ****************************
  221.  
  222.        cd\robofx
  223.        ROBOFX -LOCK 38400 -BAUD 9600 -16COL -NODE 1 -ONLINE -NOSOUND
  224.        goto after_bbs
  225.  
  226.  
  227. :96GAP
  228.  
  229. rem             ****************************
  230. rem             *   CONNECT 9600 Baud GAP  *
  231. rem             ****************************
  232.  
  233.       cd\gapn1
  234.       gapbbs 38400 0 0 9600 0 0 0
  235.       goto after_bbs
  236.  
  237.  
  238.  
  239. :72RBO
  240.  
  241. rem             *****************************
  242. rem             * CONNECT  7200 Baud  RBO   *
  243. rem             *****************************
  244.  
  245.  
  246.        cd\robofx
  247.        ROBOFX -LOCK 38400 -BAUD 7200 -16COL -NODE 1 -ONLINE -NOSOUND
  248.        goto after_bbs
  249.  
  250.  
  251. :72GAP
  252.  
  253. rem             ***************************
  254. rem             * CONNECT 7200 Baud  GAP  *
  255. rem             ***************************
  256.  
  257.       cd\gapn1
  258.       gapbbs 38400 0 0 7200 0 0 0
  259.       goto after_bbs
  260.  
  261.  
  262.  
  263. :48RBO
  264.     
  265. rem             **************************
  266. rem             * CONNECT 4800 Baud RBO  *
  267. rem             **************************
  268.  
  269.  
  270.        cd\robofx
  271.        ROBOFX -LOCK 38400 -BAUD 4800 -16COL -NODE 1 -ONLINE -NOSOUND
  272.        goto after_bbs
  273.  
  274.  
  275. :48GAP
  276.  
  277. rem             *************************
  278. rem             * CONNECT 4800 Baud GAP *
  279. rem             *************************
  280.  
  281.       cd\gapn1
  282.       gapbbs 38400 0 0 4800 0 0 0
  283.       goto after_bbs
  284.  
  285.  
  286.  
  287. :24RBO
  288.  
  289.  
  290. rem             ***************************
  291. rem             *  CONNECT 2400 Baud RBO  *
  292. rem             ***************************
  293.  
  294.  
  295.        cd\robofx
  296.        ROBOFX -LOCK 38400 -BAUD 2400 -16COL -NODE 1 -ONLINE -NOSOUND
  297.        goto after_bbs
  298.  
  299.  
  300. :24GAP
  301.  
  302. rem             ***************************
  303. rem             *  CONNECT 2400 Baud GAP  *
  304. rem             ***************************
  305.  
  306.       cd\gapn1
  307.       gapbbs 38400 0 0 2400 0 0 0
  308.       goto after_bbs
  309.  
  310.  
  311. :LOG
  312.  
  313.              *********************************
  314.              * Deleting/Processing LOG files *
  315.              *********************************
  316.  
  317. cd\db
  318.        del dbridge.log
  319.  
  320.      goto TOP
  321.  
  322.  
  323.  
  324.  
  325.  
  326.  
  327.  
  328. :TICK
  329.  
  330.              ***************************************
  331.              * Processing INCOMMING FILES via TICK *
  332.              ***************************************
  333.  
  334.  
  335.        cd\ti
  336.        tick  > G:\ti\tick.log
  337.  
  338.  
  339.    goto AFTER_BBS
  340.  
  341.  
  342.  
  343.  
  344.  
  345.  
  346. :AFTER_BBS
  347.  
  348.          cd\db
  349.          goto TOP
  350.  
  351.  
  352. :ERROR
  353.         echo. >> ROBO_%NODE%.LOG
  354.         echo. ROBOFX.EXE HAD A FATAL ERROR!  >> ROBO_%NODE%.LOG
  355.         echo. >> ROBO_%NODE%.LOG
  356.         echo.
  357.         echo. RoboBoard/FX HAD A FATAL ERROR!!!!
  358.         echo.
  359.         cd\db
  360.  
  361. :END
  362.  
  363.         cd\DB
  364.