07.01.2010, 17:21
|
#5
|
Мастер
Регистрация: 26.10.2009
Сообщений: 1,194
Написано 615 полезных сообщений (для 2,209 пользователей)
|
Ответ: Аналоговый джойстик
Вот немного изменённый код
; JoyV Example
; ------------
While Not KeyDown(1)
; Get various joystick values
ju#=JoyU()
judir=JoyUDir()
jv#=JoyV()
jvdir=JoyVDir()
jyaw#=JoyYaw()
jpitch#=JoyPitch()
jroll#=JoyRoll()
jhat#=JoyHat()
; Output joystick values
Text 0,0,"Move joystick to output values onto screen"
Text 0,20,"JoyU(): "+ju#
Text 0,40,"JoyUDir(): "+judir
Text 0,60,"JoyV(): "+jv#
Text 0,80,"JoyVDir(): "+jvdir
Text 0,100,"JoyYaw(): "+jyaw#
Text 0,120,"JoyPitch(): "+jpitch#
Text 0,140,"JoyRoll(): "+Int(jroll#)
Text 0, 160, "JoyHat(): "+jhat#
Flip
Cls
Wend
|
|
(Offline)
|
|