Inkey$ working too slow, Why?

[julioykaly]

Hello everyone!

I would like to know why when when I assing a letter on the keyboard to do simple function calls I have to type the letter two times. Here is the sample code:

Code:

cls:screen 13
n$ = inkey$
select case (n$)
case "a"
print "You press the a button."
end select
end

[Dio]

this works better:

Code:

cls:screen 13
do:press$ = Inkey$:loop until press$ <> ""
select case (press$)
case "a"
print "You press the a button."
end select
end

[Rattrapmax6]

Or...

Code:

cls:screen 13
SLEEP press$ = Inkey$
select case (press$)
case "a"
print "You press the a button."
end select
end

But I take he wants the code to loop until a key is pressed...

In anywhich case, INKEY$ is slow.. Other than that, you have INP(96) with returns the scancode of a pressed key:

Code:

DO
LOCATE 1, 1: PRINT INP(96); "   "
LOOP UNTIL INKEY$ = CHR$(27)

/\ Run that.... That's faster as you will see... ^_^

[julioykaly]

Thanks a lot for your help!

[Pyrokid]

inp(97)?

[Shizzell]

(yawn) I think they got it covered up there :wink:

[Neo]

inp(97)?

&H60 to be exact, 96. Standard keyboard port.