(update-axes) ( gadget controller-state -- )


Vocabulary
game.input.demos.joysticks

Inputs
gadgetan object
controller-statean object


Outputs
None

Definition
USING: accessors combinators kernel ui.gadgets ;

IN: game.input.demos.joysticks

: (update-axes) ( gadget controller-state -- )
{
[
[ axis>> ] [ [ x>> ] [ y>> ] [ z>> ] tri ] bi*
move-axis
]
[
[ raxis>> ] [ [ rx>> ] [ ry>> ] [ rz>> ] tri ] bi*
move-axis
]
[ [ axis>> ] [ pov>> ] bi* move-pov ]
[ [ buttons>> ] [ buttons>> ] bi* update-buttons ]
[ drop relayout-1 ]
} 2cleave ;