TIP: Click on subject to list as thread! ANSI
echo: os2prog
to: Will Morgan
from: Jerry McBride
date: 1995-02-12 10:02:42
subject: Rexx - Inkey$ ?

Will Morgan wrote in a message to Jerry McBride:

 WM> I picked up a small REXX routine from this echo illustrating 
 WM> the sysgetkey() function and it worked without having to hit 
 WM> the enter key. 

Will,

Thanks, I ran your sample code and it works like I found sysgetkey to
function. "Yes", it doesn't wait for the ENTER key to be pressed,
but it does "pause and wait" for a key to be pressed. Sorry, but
this isn't what I'm looking for. I need to poll the keyboard for a possible
key-press, and not pause to wait for one.

Below is some basic code of the function that I need to implement in rexx:



loop:

   rem
   rem Code is executed here, between the lable "loop" and the
following "if"
   rem statement. Basically, the code is run within a loop, over and over, 
  rem until a user terminates it by "touching" the keyboard...
   rem

   a$=inkey$ : if a$="" then goto loop

   rem
   rem if a$ comes back with a value, then a user desires to terminate the 
   rem loop.
   rem

   rem
   rem the program terminates
   rem

   end



All possible combinations of rexx that I have tried, I have not found a
pure rexx solution to the above "inkey" function. Craig Morrison,
201/60, has taken the time to provide me with an "inkey solution"
in the form of a C routine compiled into a rexx loadable .dll. It works
beautifully, but it's something that I have to include in whatever rexx
program that I write, that would need to poll the keyboard. From what I
have found in my rexx experimentaion, the above "inkey" function
can't be done in rexx.

Shame too.

Any more suggestions?


Jerry McBride 
--- timEd/2 1.01+
* Origin: MoDem_Corner_609-877-0836_EdgeWater_Park_NJ_USA_V.34 (1:266/28)
SEEN-BY: 12/2442 620/243 624/50 632/348 640/820 690/660 711/409 410 413 430
SEEN-BY: 711/807 808 809 934 942 949 955 712/515 713/888 800/1 7877/2809
@PATH: 266/28 400 100 505 3615/50 229/2 12/2442 711/409 808 809 934

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.