<axis-gadget> ( -- gadget )


Vocabulary
game.input.demos.joysticks

Inputs
None

Outputs
gadgetan object


Definition
USING: accessors colors kernel ui.gadgets ;

IN: game.input.demos.joysticks

: <axis-gadget> ( -- gadget )
axis-gadget new add-pov-gadgets COLOR: black
<indicator-gadget> [ >>z-indicator ] [ add-gadget ] bi
COLOR: red <indicator-gadget>
[ >>indicator ] [ add-gadget ] bi dup
[ 0.0 0.0 0.0 move-axis ] [ f move-pov ] bi ;