;[Irbis] 12.07.2014	http://forum.script-coding.com/viewtopic.php?pid=84720#p84720
MouseMoving(X, Y, S := 1000){	; Переместить курсор в позицию X, Y. S - чем меньше - тем быстрее.
 DX := 0, DY := 0, DX0 := 0, DY0 := 0
 Loop % S
  DllCall("mouse_event",UInt,1,Int, DX0:=Round(DX:=DX+X/S-DX0),Int, DY0:=Round(DY:=DY+Y/S-DY0),UInt,0,Int,0) 
}

;https://github.com/jNizM/AHK_DllCall_WinAPI/blob/master/src/Cursor%20Functions/GetCursorPos.ahk
GetCursorPos(ByRef X, ByRef Y){
 static POINT, init := VarSetCapacity(POINT, 8, 0) && NumPut(8, POINT, "Int")
 if !(DllCall("user32.dll\GetCursorPos", "Ptr", &POINT))
  Return DllCall("kernel32.dll\GetLastError")
 X := NumGet(POINT, 0, "Int"), Y := NumGet(POINT, 4, "Int")
}


*~vk1::	; Возврат курсора обратно при удержании ЛКМ:
GetCursorPos(X,Y)
Loop 
{
 State:=DllCall("GetAsyncKeyState", "Int", 1, "UShort") ; 1 = 0x1 = VK_LButton
 If !State
   Break
 GetCursorPos(X2,Y2)
 MouseMoving(X-X2, Y-Y2, 10)
}
Return

CoordMode, Mouse, Screen

MouseMoving(X, Y, S := 1000){
 DX := 0, DY := 0, DX0 := 0, DY0 := 0
 Loop % S
  DllCall("mouse_event",UInt,1,Int, DX0:=Round(DX:=DX+X/S-DX0),Int, DY0:=Round(DY:=DY+Y/S-DY0),UInt,0,Int,0) 
}

~vk1::
MouseGetPos, X, Y
KeyWait, vk1, U
MouseGetPos, X2, Y2
MouseMoving(X-X2, Y-Y2)
Return

~*LButton:: 
MouseGetPos, X, Y
While, GetKeyState("LButton", "P") {
MouseMove, X, Y, 0
}
Return

MouseMoving() {
 DllCall("mouse_event", "UInt", 0x01, "UInt", X, "UInt", Y)
}

MouseMoving() {
 DllCall("mouse_event", "UInt", 0x01, "UInt", (A_ScreenWight / 2), "UInt", (A_ScreenHeight / 2))
}