home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / adf42w.zip / ChatStart.Cmd < prev    next >
OS/2 REXX Batch file  |  1997-05-27  |  286b  |  17 lines
  1. /**/
  2.  
  3. If RxFuncQuery( 'SysLoadFuncs' ) Then Do
  4.     Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  5.     Call SysLoadFuncs
  6.     End
  7.  
  8. Call SysSleep( 10 )
  9.  
  10. Key = '0'
  11.  
  12. Do While Key \= 'N'
  13.     Say 'Starting AdeptXBBS ChatServer...'
  14.     Call SysSleep( 5 )
  15.     address cmd 'CServer'
  16. End
  17.