8 replies to this topic

[zerocool]

I need to figure out what number key was hit, by using getkey.

Would it be faster to use 10 if then statements, or would it be better to use a formula to convert it. and what is a formula that i can use?

so far i have

getkey->G
((G-(Int(G/10)*10)-2)*3)+(8-Int(G/10))->G

G is the number that is pressed. Only to slight problems:
1) its a bit slow, and i was wondering it it could be done quicker
2) it doesnt recognize 0, its return -2 for 0...

any help would be apreciated

thanks,
Zerocool

[dscoshpe]

Oh man, I had this same problem a while back too!

I don't have the solution any more but I will have you know that there IS a mathematical one that isn't slow as hell. I seem to remember having made the getkey values negative for some reason... *shrug* if I remember any more I'll check in.

- dscoshpe -

[genesis]

Good maths practice...

3G-31Int (G/10)+2->G
G=-2=>0->G

Trust me, I used to think doing it all in one line was better, but it turns out to be slower. It would probably be even better to split up the above formula.

Have you tried my grouping technique? When you have a lot of statements, the calc has to go through all of them. If you split them up into other statements, its doesn't have to go through all of them. For example,

If A<3
Then A=1=>""
A=2=>""
Else A=3=>""
A=4=>""
IfEnd

[Andy.Davies]

Please dont use Genesis's code! there is a nice quick method:

Getkey  -> A
A=>71=>B=0
A=>72=>B=1
A=>62=>B=2
A=>52=>B=3
A=>73=>B=4
A=>63=>B=5
A=>53=>B=6
A=>74=>B=7
A=>64=>B=8
A=>54=>B=9

this is a much quicker method of using if statements.
the => symbol is under Shift' /> VARS' /> F3' /> F3' />
-> is above the key on the calc.

[2072]

but with that method, even if you press 1' /> it will test for every other key...

[Marco]

I know the even quickest method (it needs 800B of RAM though):

Make a relocation list with indizes 1..80 where index = keycode+1 ( [80] corresponds key 79 (F1' />), [79] key 78 (Shift' />) and so on) Now the contents of this list can associate each value with each key you want (so you can use it for letters A..Z too).

For example make a List 1, where

List 1[72]=0
List 1[73]=1
List 1[63]=2
List 1[53]=3
List 1[74]=4
...

(set invalid values -1)

and type the following code:

List 1[Getkey+1]->A

(A=-1 means ignore key)

Surprise!

Note: if you really need keys "0".."9" only, lowest valid keycode is 53, meaning you can save 530 Bytes:

Getkey->A
if A>52 Then
List 1[A-52]->A
Else -1->A
Ifend

[genesis]

Please dont use Genesis's code! there is a nice quick method:

<{POST_SNAPBACK}>

If you don't believe me, try it out for yourself. He wanted a quicker way than that, so I gave him two.

[Andy.Davies]

If you don't believe me, try it out for yourself. He wanted a quicker way than that, so I gave him two.

<{POST_SNAPBACK}>

i meant the second piece of code