home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / control.zip / win.cmd < prev   
OS/2 REXX Batch file  |  1993-11-27  |  446b  |  19 lines
  1. /* Window for control.cmd to create a window from for each line*/
  2. /* all winx words must be separated by a blank to be replaced*/
  3.  
  4. /* Setup system functions*/
  5. Call RxFuncAdd 'SysSleep','RexxUtil','SysSleep'
  6.  
  7. xx = RXQUEUE("Set", winx )
  8.  
  9. do until line = 'SHUTDOWN'
  10.   if QUEUED() > 0 then do
  11.     pull line
  12.     say line
  13. /*    'echo 'line' > c:\bink\talk.txt'
  14.     'start /fs /b c:\bat\talk.bat'*/
  15.   end
  16.   call syssleep 7
  17. end
  18.  
  19. 'exit'