Grabbing key presses

The keycodes Here should be correct.

So this doesn't work for you?...

Graphics 640, 480, 0

Local line$

Repeat
	Cls
	DrawText " > " + line$, 10, 100
	Flip 
	
	Local char = WaitChar()
	
	Select True
		Case char >= 32
			line$ :+ Chr(char)
			
		Case char = 8
			line$ = line$[..line$.length - 1]
			
		Case (char = 27) Or (char = 13)
			Exit
	End Select
Forever

Notify line$

End