Эта программа ожидает, пока вы нажмете клавишу, а затем отображает ASCII-код нажатой вами клавиши вместе с любыми начальными нулями и символом генерируется нажатой вами клавишей.
CLS
DO
i$ = ""
WHILE i$ = ""
i$ = INKEY$
WEND
LOCATE 1, 1
IF LEN(i$) = 1 THEN PRINT ASC(i$);
IF LEN(i$) = 2 THEN PRINT "0 +" + STR$(ASC(RIGHT$(i$, 1)));
PRINT i$ + SPACE$(10)
LOOP UNTIL i$ = CHR$(27)
Тестирование выполнено в программе QB64 ( Скачать )