;Выбираете любую, редко используемую клавишу, например,
; правый Ctrl:
RControl::
MouseGetPos x0, y0 ; - получение текущих координат указателя мыши
koordinatoj_0 := "x = " . x0 . " y = " . y0
InputBox koordinatoj_1, Получение||установка новых координат указателя
, Текущие координаты: %koordinatoj_0% `n Введите новые координаты:
if ErrorLevel || (StrLen(koordinatoj_1) == 0)
return
; Извлечение координат из строки:
x1 := RegExReplace(koordinatoj_1, "[^0-9]*(\d+).*", "$1")
y1 := RegExReplace(koordinatoj_1, "[^0-9]*\d+[^0-9]+(\d+).*", "$1")
; Проверка полученных значений:
x1 := StrLen(x1) > 0 ? x1 : x0
y1 := StrLen(y1) > 0 ? y1 : y0
; Перемещение указателя мыши:
MouseMove % x1, y1
return