Потому, что ты отлавливаешь сканкод клавиши. Этого делать не надо.
SuperStrict - очень полезная в быту вещь.
Что бы русские символы отображал, надо шрифт ставить с поддержкой кирилицы.
SuperStrict
Graphics 640,480,0
Local foo$ = Inputs() 'gl_input$(10,10,"what is your name? ")
SetColor 255,255,0 ; SetScale(2,2)
DrawText "hello "+foo$+", how are you?",100,100
Flip
WaitMouse
End
Function Inputs$()
Local name$
While WaitEvent()
If CurrentEvent.id <> EVENT_KEYCHAR Then Continue
name:+Chr(CurrentEvent.data)
Cls()
DrawText(name, 10, 10)
Flip()
Wend
Return name
End Function