Переписать или написать скрипт

[naruta]

Добрый день, прошу вас помощи дорогие друзья. Мне нужно написать новый скрипт на наводку прицела на цвет пикселя или же переписать скрипт из AHK в AU3.
Пример кода который нужно переписать:
init:
#NoEnv
#SingleInstance, Force
#Persistent
#InstallKeybdHook
#UseHook
#KeyHistory, 0
#HotKeyInterval 1
#MaxHotkeysPerInterval 127

SetKeyDelay,-1, 1
SetControlDelay, -1
SetMouseDelay, -1
SetWinDelay,-1
SendMode, InputThenPlay
SetBatchLines,-1
ListLines, Off
CoordMode, Pixel, Screen, RGB
CoordMode, Mouse, Screen
PID := DllCall("GetCurrentProcessId")
Process, Priority, %PID%, High

EMCol := #ff0000
ColVn := 25
AntiShakeX := (A_ScreenHeight // 300)
AntiShakeY := (A_ScreenHeight // 300)
ZeroX := (A_ScreenWidth*45 )/100
ZeroY := (A_ScreenHeight*25 )/100
CFovX := 5
CFovY := 11
ScanL := ZeroX - CFovX
ScanT := ZeroY - CFovY
ScanR := ZeroX + CFovX
ScanB := ZeroY + CFovY
NearAimScanL := ZeroX - AntiShakeX
NearAimScanT := ZeroY - AntiShakeY
NearAimScanR := ZeroX + AntiShakeX
NearAimScanB := ZeroY + AntiShakeY

~Rbutton::
Sleep, 1500
while getkeystate("Rbutton", "p")
{
PixelSearch, AimPixelX, AimPixelY, NearAimScanL, NearAimScanT, NearAimScanR, NearAimScanB, EMCol, ColVn, Fast RGB
if (!ErrorLevel=0)
{
PixelSearch, AimPixelX, AimPixelY, ScanL, ScanT, ScanR, ScanB, EMCol, ColVn, Fast RGB
AimX := AimPixelX - ZeroX
AimY := AimPixelY - ZeroY
DirX := -1
DirY := -1
If ( AimX > 0 )
{
DirX := 1
}
If ( AimY > 0 )
{
DirY := 1
}
AimOffsetX := AimX * DirX
AimOffsetY := AimY * DirY
MoveX := Floor(( AimOffsetX ** ( 1 / 2 ))) * DirX
MoveY := Floor(( AimOffsetY ** ( 1 / 2 ))) * DirY
DllCall("mouse_event", uint, 1, int, MoveX * 2.0 , int, MoveY * 2.0, uint, 0, int, 0)
}
}
return

Pause:: pause
return:
goto, init