;SlideCursor
;By nudone
;date: 2010-04-26
ScriptVersion=0.2
;function: Slides mouse cursor across whole screens. For multi-monitor systems.

;CoordMode,Mouse,Screen ;this isn't used
;# = winkey, ! = alt, ^ = control, + = shift

Menu,Tray,Icon,%SystemRoot%\system32\SHELL32.dll,101
Menu,Tray,Tip,SlideCursor %ScriptVersion%

Hotkey, #k, 	MoveUp
Hotkey, ^!+k, 	MoveUp 		; * to work with programmable mouse buttons (if winkey not accepted)
Hotkey, ^!+j, 	MoveDown
Hotkey, #j, 	MoveDown 	; *
Hotkey, #+j, 	MoveLeft
Hotkey, ^!+h, 	MoveLeft	; *
Hotkey, #+k, 	MoveRight
Hotkey, ^!+l, 	MoveRight	; *

;screen sizes
TopScreenHeight=1080
MiddleScreenWidth=1920
LeftScreenWidth=1024
RightScreenWidth=1024

;mouse cursor movement speed
VerticalSpeed=5 ; 0 = fastet, 100 = slowest
HorizontalSpeed=10
return

; Move the mouse upwards:
MoveUp:
MouseGetPos, xpos, ypos 
MouseMove, xpos, ypos - TopScreenHeight, VerticalSpeed
return

; Move the mouse downwards:
MoveDown:
MouseGetPos, xpos, ypos
MouseMove, xpos, ypos + TopScreenHeight, VerticalSpeed
return

; Move the mouse to (far) left:
MoveLeft:
MouseGetPos, xpos, ypos 
;MouseMove, xpos - MiddleScreenWidth - LeftScreenWidth , ypos, HorizontalSpeed ; use for 3 screens full travel
MouseMove, xpos - LeftScreenWidth, ypos, HorizontalSpeed ;
return

; Move the mouse to (far) right:
MoveRight:
MouseGetPos, xpos, ypos 
;MouseMove, xpos + MiddleScreenWidth + LeftScreenWidth , ypos, HorizontalSpeed ;use for 3 screens full travel
MouseMove, xpos + RightScreenWidth, ypos, HorizontalSpeed
return