While Not KeyHit(1)
Print JoyHat()
Wend
End