(windstille-controller (up (axis-button (joystick-axis 0 1) #f)) (down (axis-button (joystick-axis 0 1) #t)) (left (axis-button (joystick-axis 0 0) #f)) (right (axis-button (joystick-axis 0 0) #t)) (fire (joystick-button 0 1)) (jump (joystick-button 0 0)) ) ;; EOF ;;