; GetKey Example

Print "Please press any ASCII key ..."

While Not value
value=GetKey()
Wend 

Print "You pressed key with an ASCII value of:" + value