This is great. I needed something like this. I am mostly writing in Jarte where the page up and page down functions move the cursor instead of just moving the page view. I have been relying on the mouse to scroll the page down.

However, I think there's an error in the mouse wheel up code. It seems to be the same as the mouse wheel down code.

I fixed it by changing "-120" to "120"


---


Command: mouse wheel <1to100> up

Declare Function mouse_event Lib "user32.dll" (ByVal dB As Long, ByVal dX As Long, ByVal dY As Long, ByVal dP As Long, ByVal dE As Long) As Long


Sub Main

dist = CInt(ListVar1)

mouse_event(&H800,0,0,120*dist,0)

End Sub

-------------------------

Dragon Professional Individual v15.6. Windows 10. Knowbrainer 2017.

Oh yes, sorry, that was my fault. I copied and pasted the code below into the text (from above, not from the command center) and the error crept in. Thanks for the correction!