home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / MSGDP206.SZH / MSGS.CMD < prev    next >
OS/2 REXX Batch file  |  1990-11-28  |  2KB  |  62 lines
  1. @Echo Off
  2. Set BBS=C:\Bink
  3. Set BINKLEY=C:\Bink\
  4. If NOT %1.==. Set BINKLEY=%1
  5. Set IN=C:\Bink\Inbound
  6. Set MAIL=C:\Bink\Mail
  7. Set OUT=C:\Bink\Outbound
  8. If Exist %BBS%\Echo.Out Del %BBS%\Echo.Out
  9. If Exist %BBS%\inmsgedp Exit
  10. Echo In Here >%BBS%\inmsgedp
  11. D:\C600\BINP\CVP /43 /CG msgedp.exe
  12. if errorlevel 31 goto export
  13. if errorlevel 30 goto export
  14. if errorlevel 29 goto pack
  15. if errorlevel 28 goto exit
  16. if errorlevel 27 goto export
  17. if errorlevel 26 goto export
  18. if errorlevel 25 goto pack
  19. if errorlevel 24 goto exit
  20. if errorlevel 23 goto export
  21. if errorlevel 22 goto export
  22. if errorlevel 21 goto pack
  23. if errorlevel 20 goto exit
  24. if errorlevel 19 goto export
  25. if errorlevel 18 goto export
  26. if errorlevel 17 goto pack
  27. if errorlevel 16 goto exit
  28. if errorlevel 15 goto export
  29. if errorlevel 14 goto export
  30. if errorlevel 13 goto pack
  31. if errorlevel 12 goto exit
  32. if errorlevel 11 goto export
  33. if errorlevel 10 goto export
  34. if errorlevel 9 goto pack
  35. if errorlevel 8 goto exit
  36. if errorlevel 7 goto export
  37. if errorlevel 6 goto export
  38. if errorlevel 5 goto pack
  39. if errorlevel 4 goto exit
  40. if errorlevel 3 goto export
  41. if errorlevel 2 goto export
  42. if errorlevel 1 goto pack
  43. if errorlevel 0 goto end
  44. :export
  45. :pack
  46. C:
  47. CD %BBS%
  48. Call Export
  49. goto exit
  50. :end
  51. C:
  52. CD %BBS%
  53. Group2 Link Out /S /C /B >Nul:
  54. REM
  55. REM Use the next line for oMMM 1.40
  56. REM oMMM -H%OUT% -M%MAIL% -I%BBS%\Binkley.PRM -C%BBS%\OMMM.CTL -Z1 -Q -G -A
  57. REM
  58. REM Use this for oMMM 1.52P and up
  59. oMMM -bOMMM.CFG
  60. :exit
  61. If Exist %BBS%\inmsgedp Del %BBS%\inmsgedp >Nul:
  62.