home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / ezirc12o.zip / install.zip / alias / beer.cmd next >
OS/2 REXX Batch file  |  1997-12-26  |  371b  |  17 lines
  1. /* BEER.CMD */
  2. /* This script is for LOCAL alias scripting.                   */
  3. /* It takes the input of /beer nickname                        */
  4. /* and converts it to /me buys nickname a Beer.  */
  5. parse arg window nick trash
  6. if nick='*'
  7.    then
  8.      nick=window
  9.    else
  10.      nop
  11.  
  12.         str = '/me buys '||nick||' a Beer. '||trash
  13.  
  14. say str
  15. return str
  16.  
  17.