managing Keyboard input by _Keyhit and _Keydown

[TempodiBasic]

Hi guys
Great QB64 that I'm still exploring...
now I'm focusing on the keyboard fast input allowed in QB64

well on my TOSHIBA  Win key (that is on the left part of keyboard) and Menu key ( that is on the right part of keyboard  between Alt Gr and Ctrl at right) give me different codes in respect to those showed into wiki pages for _KEYHIT and _KEYDOWN.

please run this code to see what feedback you have  in your PC!

Code: QB64: [Select]

1. DIM k AS LONG
2. SCREEN 0
3. CLS
4. LOCATE 1, 10: PRINT "Press a key, also Alt, Ctrl, Shift, Keypad... Escape to quit"
5. LOCATE 2, 2: PRINT "You hit... "
6. LOCATE 3, 2: PRINT "Left Alt key "
7. LOCATE 4, 2: PRINT "LeftCtrl key "
8. LOCATE 5, 2: PRINT "RightCtrl key "
9. LOCATE 6, 2: PRINT "Alt Grad key"
10. LOCATE 7, 2: PRINT "Menu key "
11. LOCATE 8, 2: PRINT "Windows key"
12. LOCATE 9, 2: PRINT "Windows key"
13. LOCATE 10, 2: PRINT "RightShift key "
14. LOCATE 11, 2: PRINT "LeftShift key"
15.  
16. DO
17.     _LIMIT 10  ' WHY QB64 is so fast to need this? :-)
18.     k = _KEYHIT
19.     LOCATE 2, 14: PRINT ABS(k); "          "
20.     LOCATE 2, 30
21.     IF k < 0 THEN
22.         PRINT "Key up  "
23.     ELSEIF k > 0 THEN
24.         PRINT "Key down "
25.     ELSE
26.         PRINT "  no key  " ' no key  and k = 0
27.     END IF
28.  
29.  
30.     IF _KEYDOWN(100308) THEN 'left alt
31.         LOCATE 3, 20: PRINT " ON "
32.     ELSE
33.         LOCATE 3, 20: PRINT "             "
34.     END IF
35.     IF _KEYDOWN(100306) THEN 'left ctrl
36.         LOCATE 4, 20: PRINT " ON "
37.     ELSE
38.         LOCATE 4, 20: PRINT "             "
39.     END IF
40.  
41.     IF _KEYDOWN(100305) THEN 'right ctrl
42.         LOCATE 5, 20: PRINT " ON "
43.     ELSE
44.         LOCATE 5, 20: PRINT "             "
45.     END IF
46.     IF _KEYDOWN(100307) THEN 'alt grad
47.         LOCATE 6, 20: PRINT " ON "
48.     ELSE
49.         LOCATE 6, 20: PRINT "             "
50.     END IF
51.     IF _KEYDOWN(100319) THEN ' menu key
52.         LOCATE 7, 20: PRINT " ON "
53.     ELSE
54.         LOCATE 7, 20: PRINT "             "
55.     END IF
56.     IF _KEYDOWN(100311) THEN 'left win key
57.         LOCATE 8, 20: PRINT " ON "
58.     ELSE
59.         LOCATE 8, 20: PRINT "             "
60.     END IF
61.     IF _KEYDOWN(100312) THEN 'right win key
62.         LOCATE 9, 20: PRINT " ON "
63.     ELSE
64.         LOCATE 9, 20: PRINT "             "
65.     END IF
66.     IF _KEYDOWN(100303) THEN 'Right Shift key
67.         LOCATE 10, 20: PRINT " ON "
68.     ELSE
69.         LOCATE 10, 20: PRINT "             "
70.     END IF
71.     IF _KEYDOWN(100304) THEN 'Left Shift key
72.         LOCATE 11, 20: PRINT " ON "
73.     ELSE
74.         LOCATE 11, 20: PRINT "             "
75.     END IF
76.  
77. LOOP UNTIL _KEYDOWN(27)
78.  
79.  

I get 91 for MenuKey and 93 for WinKey...
and you?
Thanks for feedback

PS:
Win10, QB64 1.2 Dev e490b1a

[Pete]

Left Win key 91
Right Win key 92
Menu key 93 - I had to hook up an external keyboard to my laptop to get that one.

https://www.computerhope.com/jargon/w/winkey.htm (Just to see if we are defining these keys properly. Win key is on the left in the first illustration and the menu key is on the right.

Pete

[TempodiBasic]

Thanks Pete
you're right

91 for LeftWin Key

93 for Menu Key
I have no Right Win key on my ToSHIBA as you can see https://www.google.it/search?q=toshiba+satellite+c850-1lk&client=opera&hs=idj&source=lnms&tbm=isch&sa=X&ved=0ahUKEwi0nM_Uuf3fAhWSEBQKHTifCgsQ_AUIDygC&biw=1326&bih=665#imgrc=KoP-WMaIxKjX-M:

Following your example I have now used an USB wireless Keyboard and I can get 92 for RightWin key and can confirm  all codes that you have feedback.

Thanks

Now the question is: do we get the same  results in desktop PC?

[SMcNeill]

91, 92, 93, but it's impossible for me to register a DOWN even. 

Windows 10 traps the key when it goes down, waiting for another keypress so it can do its thing, so QB64 only responds to the key UP event on my machine.

There's no such thing as a down and hold event.  :P

None of the commands work at all for me with _KEYDOWN:

Code: QB64: [Select]

1. DO
2.     _LIMIT 60 ' so your PC fan won't explode with an endless loop
3.     IF _KEYDOWN(91) THEN PRINT "BOO"
4.     IF _KEYDOWN(92) THEN PRINT "BEES"
5.     IF _KEYDOWN(93) THEN PRINT "PLEASE"
6. LOOP UNTIL _KEYDOWN(27)

[TempodiBasic]

None of the commands work at all for me with _KEYDOWN:

Steve I agree

Code: QB64: [Select]

1. DO
2.     _LIMIT 60 ' so your PC fan won't explode with an endless loop
3.     h& = -(_KEYHIT)
4.     IF _KEYDOWN(91) THEN PRINT "Boo222"; "       "
5.     IF h& = 91 THEN PRINT "BOO"; "       "
6.     IF _KEYDOWN(92) THEN PRINT "BEES222"; "       "
7.     IF h& = 92 THEN PRINT "BEES"; "       "
8.     IF _KEYDOWN(93) THEN PRINT "PLEASE222"; "       "
9.     IF h& = 93 THEN PRINT "PLEASE"; "       "
10.     IF h& > 0 THEN LOCATE 2, 2: PRINT h&; "       "
11. LOOP UNTIL _KEYDOWN(27)
12.  
13.  

you can manage only Hit events after those of down event of system!