home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / BEXEN250.LZH / SPAWNBBS.CMD < prev   
OS/2 REXX Batch file  |  1991-09-17  |  2KB  |  59 lines
  1. REM
  2. REM A working sample file, from C:\BINK to C:\MAX
  3. REM
  4. @Echo off
  5. cls
  6. C:
  7. CD \Bink
  8. If Exist Echo.Out Del Echo.Out >Nul:
  9.  
  10. CD \MAX
  11. REM Echo Parms passed are: %1 %2 %3 %4 %5  (DTE/CONNECT/hPort/Time/MODEMQual)
  12. C:\Bink\BigBro.Exe %3 C:\Max\max.exe -b%2 -p%3 -t%4 -n1 -z\pipe\bbs
  13. If errorlevel 12 Goto Echox
  14. If errorlevel 11 Goto Packem
  15. If errorlevel 5 Goto Local
  16. Goto Exit
  17.  
  18. :Echox
  19. If Exist C:\Bink\ECHO.OUT SCANBLD USER.BBS AREA.DAT local matrix @C:\Bink\Echo.Out
  20. CD \BINK
  21. :Reecho
  22. If Exist ECHO.OUT VP2 Export %BINKLEY%AREAS.BBS -0 -M 500 -S 0 -F %BINKLEY%Echo.Out -C -Q -O %OUT% -A ARC2 A5
  23.  
  24. :REM Severe Error = 2, Partial Export = 1, Goodness = 0.
  25. If ERRORLEVEL 2 Goto SEVEXP1
  26. If ERRORLEVEL 1 Goto SEVPEXP
  27. Goto PURGEM
  28.  
  29. :SEVEXP1
  30. ECHO Severe Error In POSTTOSS Export
  31. ECHO Severe Error In POSTTOSS Export >> ERROR.LOG
  32. ECHO Severe Error In POSTTOSS Export >c:\Bink\Outbound\Export.z
  33. Goto PACKEM
  34.  
  35. :SEVPEXP
  36. ECHO Partial Export of AREAS.BBS messages.
  37. oMMM -H%OUT% -M%MAIL% -I%BINKLEY%Binkley.PRM -C%BINKLEY%OMMM.CTL -P%BINKLEY%PRESCAN.CTL -S%SCHED% -Z1 -Q -G -A
  38. Goto Reecho
  39.  
  40. :PURGEM
  41. :REM Now that either ARCMAIL/NETMAIL or ECHOMAIL is all finished...
  42. If Exist c:\Bink\Outbound\E*.z Del c:\Bink\Outbound\E*.z
  43. Goto PACKEM
  44.  
  45. :PACKEM -- Here to pack up anything in Matrix Mail area.
  46. CD \MAX
  47. If NOT Exist C:\Bink\ECHO.OUT SCANBLD USER.BBS AREA.DAT local matrix
  48. CD \BINK
  49. Remapper 30039 -cp -fp
  50. oMMM -H%OUT% -M%MAIL% -I%BINKLEY%Binkley.PRM -C%BINKLEY%OMMM.CTL -P%BINKLEY%PRESCAN.CTL -S%SCHED%
  51. Goto EXIT
  52.  
  53. :LOCAL -- Here to scan for local only mail
  54. SCANBLD USER.BBS AREA.DAT local
  55. CD \BINK
  56.  
  57. :EXIT
  58. Echo Returning to BinkleyTerm
  59.