Guru
Joined: 02/06/2014
Location: GermanyPosts: 1733
| Posted: 03:23pm 17 Jan 2025 |
As Peter wrote, keycode could sometimes help.
However, there are differences between USB and USB+Console.
Dim key$
CLS
Print "press a key to check! EXIT with CTRL + <C>"
Do
Do :Key$=Inkey$:Loop While Key$=""
k=KeyDown(1)
Print "Keycode: "Asc(key$),
If key$>=" " Then
Print "ASCII: ";key$,"Keydown(7): "KeyDown(7)
Else
Print
EndIf
Loop
End
CLS
Print "press a key to check! EXIT with CTRL + <C>"
Do
Do :Key$=Inkey$:Loop While Key$=""
k=KeyDown(1)
Print "Keycode: "Asc(key$),
If key$>=" " Then
Print "ASCII: ";key$,"Keydown(7): "KeyDown(7)
Else
EndIf
Loop
End
Michael