AutoHotkey Community

; scroll ball left and right
; or
; horizontal scroll forward/back
; or
; browser forward/back

#InstallKeybdHook

; Scroll Left/Right
$+<::Send {Left}   ; Shift+Left Arrow
$+>::Send {Right}   ; Shift+Right Arrow

~LButton:: ; Left Mouse Button, Scroll left
ControlGetFocus, fcontrol, A   ; get control with input focus
Loop 2  ; <-- Increase this value to scroll faster.
    SendMessage, 0x114, 0, 0, %fcontrol%, A  ; 0x114 is WM_HSCROLL and the 0 after it is SB_LINELEFT. OR
    SendMessage, 0x115, 0, 0, %fcontrol%, A  ; 0x114 is WM_VSCROLL - vertical scrolling
return

~RButton::  ; Right Mouse Button, Scroll right.
ControlGetFocus, fcontrol, A
Loop 2  ; <-- Increase this value to scroll faster.
    SendMessage, 0x114, 1, 0, %fcontrol%, A  ; 0x114 is WM_HSCROLL and the 1 after it is SB_LINERIGHT. OR
    SendMessage, 0x115, 1, 0, %fcontrol%, A  ; 0x114 is WM_VSCROLL  vertical scrolling
return

; Horizontal Scroll forward/back
$Lalt::Send {WheelLeft}   ; Left Alt button
$Ralt::Send {WheelRight}   ; Right Alt button

; Browser Forward/Back
$<::Send {Browser_Back}   ; Left Arrow, Browser Back Button
$>::Send {Browser_Forward} ; Right Arrow, Browser Forward Button

~RButton::RapidHotkey("Forward""Back", 2, 1)  ;two taps RBuitton = Forward, three taps RButton = Back,  ~ prevents RButton Activating Contextmenu, instead runs script
Forward:
    ; ADD Code snippet from above script for whichever one you like. Example
    Send {Browser_Forward}
Return
   
Back:
    Send {Browser_Back}   
Return   

Send, {XButton1} ; the 'back' button on a mouse
Send, {XButton2} ; the 'forward' button on a mouse

~RButton & LButton:: 
SendInput, {Browser_Back}
SetTimer, RBUp, 10
Return

RBUp:
GetKeyState, state, RButton
if state = U
{
   SetTimer, RBUp, Off
   SendInput, {Alt}
}
Return

~LButton & RButton::
SendInput, {Browser_Forward}
Return