home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #30 / NN_1992_30.iso / spool / comp / lang / rexx / 1423 < prev    next >
Encoding:
Internet Message Format  |  1992-12-17  |  904 b 
  1. Path: sparky!uunet!vnet.ibm.com
  2. From: pmuellr@vnet.ibm.com (Pat Mueller)
  3. Message-ID: <19921217.074053.65@almaden.ibm.com>
  4. Date: Thu, 17 Dec 92 10:37:44 EST
  5. Newsgroups: comp.lang.rexx
  6. Subject: Prompt for invisible input
  7. Lines: 23
  8.  
  9. >to do a pull to read the imput from the keyboard
  10. >and i don't want that imput appears on the screen.
  11. >can you help me?
  12. >thanks.
  13.  
  14. On OS/2 you can cheat with ANSI control codes - make the foreground
  15. and background the same before prompting the user - the stuff they
  16. type in will be 'invisible' (blocks of arbitrary color).  Here's an
  17. example:
  18.  
  19.    /* */
  20.    whiteOnWhite = d2c(27) || "[47;37m"
  21.    whiteOnBlack = d2c(27) || "[47;30m"
  22.  
  23.    call charout , "Enter a line: " || whiteOnWhite
  24.    line = linein("STDIN:")
  25.    say whiteOnBlack || "received ->" line
  26.  
  27. In case they don't translate well, | is vertical bar, [ is left bracket
  28.  
  29. Patrick Mueller
  30. Programming Systems
  31. IBM Cary, NC
  32.