[mingw]

Потому, что ты отлавливаешь сканкод клавиши. Этого делать не надо.

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