home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / wps / mmpm2 / ssnd / sstoolkt / sspipe / rexx.cmd < prev   
OS/2 REXX Batch file  |  1993-06-26  |  695b  |  28 lines
  1. /* REXX */
  2.  
  3. /*****************************************************************************\
  4. *  
  5. *  BocaSoft System Sounds Named Pipe Example 
  6. *
  7. *  Copyright (c) BocaSoft Incorporated 1993
  8. *
  9. *  This simple REXX procedure takes an index from the user and writes
  10. *  it to the BocaSoft System Sounds named pipe - "\pipe\bs_ssnd".  This
  11. *  pipe acts like a file and can be accessed from OS/2, DOS and Windows. 
  12. *  See the file ssndmsg.c for more information on index values.
  13. *
  14. \*****************************************************************************/
  15.  
  16. file = '\pipe\bs_ssnd'
  17.  
  18. do while 1
  19.  
  20.     say "Enter an index value: "
  21.  
  22.     index = linein()
  23.  
  24.     'echo 'index' > 'file
  25.  
  26. end
  27.  
  28.