AutoHotkey Community

SetDefaultMouseSpeed, 0 ; Sets the delay of mouse speed to instant
w::MouseMove, 0, -25, 100, R ; when you press w, mouse will move up 25 pixels
s::MouseMove, 0, 25, 100, R ; when you press s, mouse will move down 25 pixels
a::MouseMove, -25, 0, 100, R ; when you press a, mouse will move left 25 pixels
d::MouseMove, 25, 0, 100, R ; when you press d, mouse will move right 25 pixels
q::MouseClick, left ; when you press q, mouse will left click
e::MouseClick, right ; when you press e, mouse will right click
x::MouseClick, WheelDown ; when you press x, mouse will scroll down
2::MouseClick, WheelUp ; when you press 2, mouse will scroll up
^!z::ExitApp ; when you press ctrl+alt+z, the app will exit

^!a::Run scriptname.ahk ; will run the script on ctrl+alt+a

#Persistent
SetDefaultMouseSpeed, 0

; SETTINGS
; --------
; futz with these to get the movement as you'd like it
; the settings below are the ones i liked after just
; a few minutes of playing around
distance = 10         ; - how far the mouse moves each turn of the timer
multiplier = 1.08     ; - how much farther (exponentially) the mouse moves in
                      ;   a direction the longer you hold that direction down
CFKM = 30             ; - how often to run the timer

SetTimer, CheckForKeyMouse, %CFKM%

return

CheckForKeyMouse:
   if not GetKeyState("Shift")
      return
   GetKeyState("Down") ? (d*=multiplier) : (d:=1)
   GetKeyState("Up") ? (u*=multiplier) : (u:=1)
   GetKeyState("Right") ? (r*=multiplier) : (r:=1)
   GetKeyState("Left") ? (l*=multiplier) : (l:=1)   
   y := (d-u) * distance
   x := (r-l) * distance
   MouseMove, x, y, , R
return