set #poisk findcolor (0, 0 1600, 900 1 1 (3949430) %arr 2 1 abs) //поиск цвета по экрану
if #poisk > 0           // если найден нужный цвет, то
  move %arr [1 1], %arr [1 2] // наведем мышку на точку
end_if
set #vustrel findcolor (795, 445 805, 455 1 1 (3949430) %fire 2 1 abs) //когда цвет попадает в область прицела
if #vustrel > 0           // если если цвет в прицеле, то
  kleft %fire [1 1], %fire [1 2] // сделаем один выстрел
end_if

log СТАРТ
set #x 1280/2    // от куда двигаем курсор
set #y 720/2     // от куда двигаем курсор
log начало движения #x x #y
move #x #y             // навели
wait 100
kleft_down #x #y       // зажали ЛКМ
wait 100
move 1000 400 //#x #y      // Переместили курсор
wait 200
get mouse_pos #x #y     // нашли курсор
log сместили курсор в #x х #y             // показать в лог
wait 200
kleft_up #x #y         // отпустили ЛКМ
log отпустили ЛКМ в #x х #y             // показать в лог
wait 100
get mouse_pos #x #y     // нашли курсор
log конечная коорд. курсора  #x x #y             // показать в лог
end_script

log СТАРТ
set #x 1280/2    // от куда двигаем курсор
set #y 720/2     // от куда двигаем курсор
log начало движения #x x #y
move #x #y             // навели
wait 100
kleft_down #x #y       // зажали ЛКМ
wait 100
set clickoffsetx 300     // смещение для координаты X
set clickoffsety 50     // смещение для координаты Y
move_smooth #x #y      // Переместили курсор медленно
wait 200
get mouse_pos #x #y     // нашли курсор
log сместили курсор в #x х #y             // показать в лог
wait 200
kleft_up #x #y         // отпустили ЛКМ
log отпустили ЛКМ в #x х #y             // показать в лог
wait 100
get mouse_pos #x #y     // нашли курсор
log конечная коорд. курсора  #x x #y             // показать в лог
end_script

Func _MouseMovePlus($X, $Y,$absolute = 0)
        Local $MOUSEEVENTF_MOVE = 1
    Local $MOUSEEVENTF_ABSOLUTE = 32768
    DllCall("user32.dll", "none", "mouse_event", _
            "long",  $MOUSEEVENTF_MOVE + ($absolute*$MOUSEEVENTF_ABSOLUTE), _
            "long",  $X, _
            "long",  $Y, _
            "long",  0, _
        "long",  0)
EndFunc

Func _MouseMovePlus($X, $Y,$absolute = 0)
        Local $MOUSEEVENTF_MOVE = 1
        DllCall("user32.dll", "none", "mouse_event", _
            "long",  $MOUSEEVENTF_MOVE, _
            "long",  $X, _
            "long",  $Y, _
            "long",  0, _
        "long",  0)
EndFunc

set #HWND findwindow ('Твоя игра')
set #WM_MOUSEMOVE hex2dec(0x0200)
set $wParam 0
set $lParam тут координаты

set $msg sendmessage (#HWND #WM_MOUSEMOVE $wParam $lParam)

end_script

// пример как выделить текст в блокноте
// не забыть про привязку к окну Ctrl+A

set #WM_MOUSEMOVE 512
set #WM_LBUTTONDOWN 513
set #WM_LBUTTONUP 514
set #MK_LBUTTON 1

// координаты выделения
set #x 0
set #y 0
set #x2 300
set #y2 300

set #lparam  #x + #y * 65536
set $s sendmessage (workwindow #WM_LBUTTONDOWN #MK_LBUTTON #lparam)  // зажать левую кнопку мыши
wait 200
set #lparam  #x2 + #y2 * 65536
set $s sendmessage (workwindow #WM_MOUSEMOVE 0 #lparam)    // переместить курсор
wait 200
set $s sendmessage (workwindow #WM_LBUTTONUP 0 #lparam)    // отпустить левую кнопку мыши
end_script

//...
call move 100 -50      // сдвинуть курсор на 100 вправо и на 50 вверх
wait 2000
call move -100 50      // вернуть курсор обратно
wait 2000
call move 1100 500 abs // передвинуть курсор в кординаты 1100 500
//...
end_script
proc move #x #y $abs
set linedelay 0
set #flags 1
if $abs = abs
set #flags 32769
set #x 65536 * #x / screenwidth
set #y 65536 * #y / screenheight
end_if
exec winapiexec.exe u@mouse_event #flags #x #y 0 0
end_proc

set $params 1 -300 -250 0 0
call winapi u mouse_event $params              // сдвинуть курсор на 300 влево и на 250 вверх
wait 1000

call move 300 250                              // вернуть курсор обратно    (КОРОТКАЯ ЗАПИСЬ)
wait 2000
call move 500 500 abs                          // сдвинуть курсор в 500x500 (КОРОТКАЯ ЗАПИСЬ)

set $params 0 open calc.exe 0 0 1
call winapi s ShellExecuteW $params            // запустить калькулятор
wait 4000

set $params findwindow('калькулятор') 16 0 0
call winapi u SendMessageW $params             // закрыть калькулятор

end_script

//---------------------------------------------

proc winapi $lib $function $params
set linedelay 0
switch $lib
case u
exec winapiexec.exe user32.dll@$function $params
break
case s
exec winapiexec.exe shell32.dll@$function $params
break
end_switch
end_proc
proc move #x #y $abs
set linedelay 0
set #flags 1
if $abs = abs
set #flags 32769
set #x 65536 * #x / screenwidth
set #y 65536 * #y / screenheight
end_if
exec winapiexec.exe u@mouse_event #flags #x #y 0 0
end_proc

wait 500
set linedelay 0
call move -500 -230           // сдвинуть курсор на 500 влево и на 230 вверх

wait 1200

call movesmooth 500 230       // плавно вернуть курсор обратно

end_script

//----------------------------

proc movesmooth #x #y
set #cf 12
set #cx #x / #cf
set #cy #y / #cf
repeat #cf
call move #cx #cy
end_repeat
set #fx #x - #cx * #cf
set #fy #y - #cy * #cf
call move #fx #fy
end_proc

proc move #x #y $abs
set linedelay 0
set #flags 1
if $abs = abs
set #flags 32769
set #x 65536 * #x / screenwidth
set #y 65536 * #y / screenheight
end_if
exec winapiexec.exe u@mouse_event #flags #x #y 0 0
end_proc