home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / POINTKT3.ZIP / MSGS.CMD < prev    next >
OS/2 REXX Batch file  |  1990-07-19  |  1KB  |  54 lines
  1. @Echo Off
  2. Set BBS=C:\Bink
  3. Set BINKLEY=C:\Bink\
  4. Set IN=C:\Bink\Inbound
  5. Set MAIL=C:\Bink\Mail
  6. Set OUT=C:\Bink\Outbound
  7. C:
  8. CD %BBS%
  9. If Exist Echo.Out Del Echo.Out
  10. If Exist %BINKLEY%inmsgedp Exit
  11. Echo In Here >%BINKLEY%inmsgedp
  12. %BINKLEY%msgedp
  13. if errorlevel 31 goto export
  14. if errorlevel 30 goto export
  15. if errorlevel 29 goto pack
  16. if errorlevel 28 goto exit
  17. if errorlevel 27 goto export
  18. if errorlevel 26 goto export
  19. if errorlevel 25 goto pack
  20. if errorlevel 24 goto exit
  21. if errorlevel 23 goto export
  22. if errorlevel 22 goto export
  23. if errorlevel 21 goto pack
  24. if errorlevel 20 goto exit
  25. if errorlevel 19 goto export
  26. if errorlevel 18 goto export
  27. if errorlevel 17 goto pack
  28. if errorlevel 16 goto exit
  29. if errorlevel 15 goto export
  30. if errorlevel 14 goto export
  31. if errorlevel 13 goto pack
  32. if errorlevel 12 goto exit
  33. if errorlevel 11 goto export
  34. if errorlevel 10 goto export
  35. if errorlevel 9 goto pack
  36. if errorlevel 8 goto exit
  37. if errorlevel 7 goto export
  38. if errorlevel 6 goto export
  39. if errorlevel 5 goto pack
  40. if errorlevel 4 goto exit
  41. if errorlevel 3 goto export
  42. if errorlevel 2 goto export
  43. if errorlevel 1 goto pack
  44. if errorlevel 0 goto end
  45. :export
  46. :pack
  47. Call Export
  48. goto exit
  49. :end
  50. REM Group2 Out /C /B >Nul:
  51. oMMM -bOMMM.CFG
  52. :exit
  53. If Exist %BINKLEY%inmsgedp Del %BINKLEY%inmsgedp >Nul:
  54.