home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / adf42w.zip / AdeptStart.Cmd < prev    next >
OS/2 REXX Batch file  |  1997-07-26  |  505b  |  26 lines
  1. /**/
  2.  
  3.  
  4. Say 'Re-Indexing UserBase For AdeptXBBS'
  5. address cmd '@uNuke /r /q'
  6.  
  7.  
  8. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  9. Call SysLoadFuncs
  10. Call RxFuncAdd 'RxLoadFuncs', 'REXXBOS', 'RxLoadFuncs'
  11. Call RxLoadFuncs
  12.  
  13. Say 'Waiting To Start...'
  14.  
  15. Call SysSleep( 30 )
  16.  
  17. Key = '0'
  18.  
  19. Do While Key \= 'N'
  20.     Say 'Starting AdeptXBBS'
  21.     address cmd '@c:\ut\sio\su 2 lock 57600'
  22.     address cmd '@c:\ut\sio\su 3 lock 57600'
  23.     Call SysSleep( 5 )
  24.     address cmd '@Adept /DONTSLAM /NODES 2'
  25. End
  26.