Module Bogue.Mouse

module Mouse: sig .. end

Mouse and touchscreen information.

All positions are given in logical pixels, not hardware pixels (see the Theme SCALE variable).

Dependency graph

val pointer_pos : Tsdl.Sdl.event -> int * int

Return the pointer current position. This works both for mouse and touchscreen.

val pos : unit -> int * int

Get current mouse position.

val window_pos : Tsdl.Sdl.window -> int * int

Return the mouse position with respect to the given window, using window position if necessary.

val button_pos : Tsdl.Sdl.event -> int * int
val finger_pos : Tsdl.Sdl.event -> float * float
val wheel_y : Tsdl.Sdl.event -> int
val set_wheel_speed : float -> unit

Set the speed of vertical scrolling via the mouse wheel and touchpad. By default, wheel speed is 1. for usual vertical scrolling (standard on Linux) and -1. for "natural" scrolling (standard on Mac OS). set_wheel_speed 0. (or any speed less than 0.01) will disable mouse wheel scrolling.