2022-07-31 21:57:56 +00:00
{{QBDLDATE:07-31-2022}}
{{QBDLTIME:23:40:49}}
2022-05-20 22:18:31 +00:00
{{DISPLAYTITLE:_WHEEL}}
The [[_WHEEL]] function returns the relative position of a specified wheel number on a controller device.
{{PageSyntax}}
: {{Parameter|move}} = [[_WHEEL]]({{Parameter|wheelNumber%}})
* Returns -1 when scrolling up and 1 when scrolling down with 0 indicating no movement since last read.
* Add consecutive wheel values to determine a cumulative value over time for scrolling or moving objects.
* {{Parameter|wheelNumber%}} must be a number which does not exceed the number of wheels found by the [[_LASTWHEEL]] function.
* When a mouse indicates it has 3 wheels, the first two are for relative movement reads. The third wheel is for scrolling.
* '''The number of [[_DEVICES]] must be read before using [[_DEVICE$]], [[_DEVICEINPUT]] or [[_LASTWHEEL]].'''
{{PageExamples}}
''Example 1:'' Reading multiple controller device buttons, axis and wheels.
{{CodeStart}}
{{Cl|FOR...NEXT|FOR}} i = 1 {{Cl|TO}} {{Cl|_DEVICES}}
{{Cl|PRINT}} {{Cl|STR$}}(i) + ") " + {{Cl|_DEVICE$}}(i) + " Buttons:"; {{Cl|_LASTBUTTON}}(i); ",Axis:"; {{Cl|_LASTAXIS}}(i); ",Wheel:"; {{Cl|_LASTWHEEL}}(i)
{{Cl|NEXT}}
{{Cl|DO...LOOP|DO}}
d& = {{Cl|_DEVICEINPUT}}
{{Cl|IF...THEN|IF}} d& {{Cl|THEN}} ' the device number cannot be zero!
{{Cl|PRINT}} "Found"; d&;
{{Cl|FOR...NEXT|FOR}} b = 1 {{Cl|TO}} {{Cl|_LASTBUTTON}}(d&)
{{Cl|PRINT}} {{Cl|_BUTTONCHANGE}}(b); {{Cl|_BUTTON}}(b);
{{Cl|NEXT}}
{{Cl|FOR...NEXT|FOR}} a = 1 {{Cl|TO}} {{Cl|_LASTAXIS}}(d&)
{{Cl|PRINT}} {{Cl|_AXIS}}(a);
{{Cl|NEXT}}
{{Cl|FOR...NEXT|FOR}} w = 1 {{Cl|TO}} {{Cl|_LASTWHEEL}}(d&)
{{Cl|PRINT}} {{Cl|_WHEEL}}(w);
{{Cl|NEXT}}
{{Cl|PRINT}}
{{Cl|END IF}}
{{Cl|LOOP}} {{Cl|UNTIL}} {{Cl|INKEY$}} = {{Cl|CHR$}}(27) 'escape key exit
{{Cl|END}}
{{CodeEnd}}
: ''Note:'' When there is no device control to read, a [[FOR...NEXT|FOR]] n = 1 TO 0 loop will not run thus avoiding a control function read error.
''Example 2:'' Why does a mouse have 3 wheels? Relative x and y movements can be read using the first 2 _WHEEL reads.
{{CodeStart}}
ignore = {{Cl|_MOUSEMOVEMENTX}} 'dummy call to put mouse into relative movement mode
{{Cl|PRINT}} "Move your mouse and/or your mouse wheel (ESC to exit)"
d = {{Cl|_DEVICES}} ' always read number of devices to enable device input
DO: {{Cl|_LIMIT}} 30 'main loop
{{Cl|DO...LOOP|DO}} {{Cl|WHILE}} {{Cl|_DEVICEINPUT}}(2) 'loop only runs during a device 2 mouse event
{{Cl|PRINT}} {{Cl|_WHEEL}}(1), {{Cl|_WHEEL}}(2), {{Cl|_WHEEL}}(3)
{{Cl|LOOP}}
{{Cl|LOOP}} {{Cl|UNTIL}} {{Cl|INKEY$}} = {{Cl|CHR$}}(27)
{{CodeEnd}}
: ''Explanation:'' Referencing the [[_MOUSEMOVEMENTX]] function hides the mouse and sets the mouse to a relative movement mode which can be read by [[_WHEEL]]. [[_DEVICEINPUT]](2) returns -1 (true) only when the mouse is moved, scrolled or clicked.
{{PageSeeAlso}}
* [[_MOUSEWHEEL]]
* [[_LASTWHEEL]], [[_LASTBUTTON]], [[_LASTAXIS]]
* [[_AXIS]], [[_BUTTON]], [[_BUTTONCHANGE]]
* [[_DEVICES]], [[_DEVICE$]], [[_DEVICEINPUT]]
* [[_MOUSEMOVEMENTX]], [[_MOUSEMOVEMENTY]]
* [[Controller Devices]]
{{PageNavigation}}
2022-07-31 21:57:56 +00:00
[[Category:Latest]]