[REBOL] Re: kbhit()

From: louisaturk:eudoramail at: 22-Jun-2001 17:58

Thanks, Holger and Jeff,

This is what I wanted:

REBOL []

     kbhit: func [][
         con: open/direct/binary/no-wait console://
         until [wait con]
         choice: to-char pick con 1
     ]

     forever [
         ;ask "Press the lower case x key."     <====<<<  This won't work.
         print "Press the lower case x key."
         choice: kbhit
         print choice
         if choice = #"x" [print "It works!"]
     ]

Took me awhile to learn how to use your code.  I was using ask instead of
print in the line above.  :>)    Stayed up too late last night!

Many thanks again for all the help.  I really need this function, as I use
it often.  I hate typing two key when one keystroke will do.

Louis

At 11:57 AM 6/22/2001 -0700, you wrote:

1 · 2 · [3] · 4 · 5 ... 13 · 14 · 15 · 16 · 17 · See whole thread