; JoyXDir() example

While Not KeyHit(1)
Cls
Text 0,0,"Joy X Direction: " + JoyXDir()
Wend