home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / MSG.ZIP / MSGS.CMD < prev    next >
OS/2 REXX Batch file  |  1991-10-10  |  725b  |  30 lines
  1. @Echo Off
  2. Rem MSGS.CMD from Nibbles & Bytes - Node 1:124/1113
  3. Rem In your BINKLEY.CFG setup, use the line:
  4. Rem    READER MSGS
  5. Rem For interactive use, use MSGS rather than MSG
  6. Rem Change what you need...
  7.  
  8. Msg Xchange More Clear Hotkeys ^^ %1 %2 %3 %4 %5 %6 %7 %8 %9
  9.     If ErrorLevel 3 Goto Error
  10.     If ErrorLevel 2 Goto EchoMail
  11.     If ErrorLevel 1 Goto NetMail
  12.     Goto Exit
  13.  
  14. :Error
  15.     Echo Fatal Error!  MSG did not execute properly!
  16.     Pause
  17.     Goto Exit
  18.  
  19. :EchoMail
  20.     Call Scan Areas.BBS -F MsgToss.Log
  21.     Call Mash
  22.     ScanBld %MAX%\User.BBS %MAX%\Area.Dat Local Matrix @MsgToss.Log /ND
  23.     Goto Exit
  24.  
  25. :NetMail
  26.     Call Mash
  27.     ScanBld %MAX%\User.BBS %MAX%\Area.Dat Local Matrix
  28.  
  29. :Exit
  30.