Making a key perform mouse wheel scrolling
Making a key perform mouse wheel scrolling
I have severe hand disabilities and am not able to scroll the mouse wheel but some programs require it. I looked around the web but could not find something that can specifically do this: When I press a key (once), it scrolls the mouse wheel either up or down a set amount (let's say a few times). Please advise. Thank you!
Re: Making a key perform mouse wheel scrolling
Code: Select all
f1::
send {WheelDown 1}
return
f2::
send {WheelUp 1}
return
Re: Making a key perform mouse wheel scrolling
How can I make it scroll for a few seconds by only pressing the key once? I don't want to have to continuously press on the key.Epialis wrote: ↑03 Jan 2021, 16:25Just hold the key down to continuous scrollCode: Select all
f1:: send {WheelDown 1} return f2:: send {WheelUp 1} return
Re: Making a key perform mouse wheel scrolling
Code: Select all
F1::
Loop, 20 {
Send {WheelDown}
Sleep, 100
}
Return
-
- Posts: 63
- Joined: 05 May 2021, 10:19
Re: Making a key perform mouse wheel scrolling
Code: Select all
F14::
Loop, 20 {
Send {WheelDown}
Sleep, 100
}
Return
Re: Making a key perform mouse wheel scrolling
Code: Select all
F14::WheelDown
Code: Select all
F14::
While GetKeyState("F14", "P") {
Send {WheelDown}
Sleep, 30
}
Return
Re: Making a key perform mouse wheel scrolling
Hallo,
try:
Press LCtrl ( =down position), move the mouse down or up and release LCtrl. Then WheelUps or WheelDowns are sent depending on the position of the mouse relative to the down position until the mouse is not moved for 1/2 second.
try:
Code: Select all
#InstallKeybdHook
#InstallMouseHook
~LCtrl::MouseGetPos,, y1
~LCtrl Up::
While, (A_TimeIdleMouse < 500) And (A_PriorKey = "LControl")
{
MouseGetPos,, y2
IF (y2-y1 > 25)
Send, {WheelUp}
Else IF (y1-y2 > 25)
Send, {WheelDown}
Sleep, 100
}
Return