Keypad Entry

[eoredson]

Use _KEYHIT or _KEYDOWN instead.

https://qb64phoenix.com/qb64wiki/index.php/KEYHIT

https://qb64phoenix.com/qb64wiki/index.php/KEYDOWN

I tried this code with _keyhit and still does not return keypad-5:

Code: (Select All)

Rem Keypad-5 = 76
Rem Shift-Keypad-5 = 53
Rem Ctrl-Keypad-5 = 143
Do
  X = _KeyHit
  If X Then
      Print "Keypress="; X
      If X = 27 Then End
      If X >= 256 And X <= 65535 Then
        X = (X And &HFF00) / 256
        Print "Ascii2="; X
        Select Case X
            Case 76
              Print "keypad-5"
            Case 53
              Print "shift-keypad-5"
            Case 143
              Print "ctrl-keypad-5"
        End Select
      End If
  End If
Loop
End