home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / SSNDPIPE.ZIP / INPUT.CMD next >
OS/2 REXX Batch file  |  1993-05-03  |  289b  |  25 lines
  1. /* REXX */
  2.  
  3.  
  4. /* The named piped created by SSNDPIPE.EXE */ 
  5.  
  6. pipe = '\pipe\bs_ssnd'
  7.  
  8.  
  9. /* 
  10. *  Loop forever. Get input from user and echo to pipe. 
  11. *  A -1 will terminate SSNDPIPE.EXE.
  12. */
  13.  
  14. do while 1
  15.  
  16.     say "Input > "
  17.  
  18.     index = linein()
  19.  
  20.     'echo 'index' > 'pipe
  21.  
  22. end
  23.  
  24.  
  25.