SetWorkingDir %A_ScriptDir%

text := "PixelSearch,,,"
P := "`," 
O := ";"
Name := "A_RESULT"
Name_Title := "A_RESULT.txt"

vkC0::    ; ~(Ё)
{
MouseGetPos, MouseX, MouseY

WinGetActiveTitle, Title
WinGetPos, Xm, Ym, Wm, Hm, %Title%
InputBox, UserInput

PixelGetColor, color, %MouseX%, %MouseY%

xvar := MouseX/A_ScreenWidth
yVar := MouseY/A_ScreenHeight

x = Round((Xm+Wm)*%xVar%)
y = Round((Ym+Hm)*%yVar%)

FileAppend, %text% %x%%P% %y%%P% %x%%P% %y%%P% %color%%P%%P% fast        %O% (%MouseX%%P% %MouseY%) %UserInput%, %Name_Title%
FileAppend, `nif ErrorLevel = 0, %Name_Title%
FileAppend, `n`n, %Name_Title%

Process, Close, %PID1%    
Run, %Name%.txt,, Min, PID1

WinActivate, %Title%
}
Return

Дописал скрипт, чтобы на будущее "фотографировать" пиксели с алгоритмом масштабирования. Можете дополнить если есть какие идеи.

WinGetPos, Xm, Ym, Wm, Hm, ahk_class NAME
NumPad2::
PixelSearch,,, Round(Wm*0.0098958333333333), Round(Hm*0.7407407407407407), Round(Wm*0.0098958333333333), Round(Hm*0.7407407407407407), 0x333333,, fast
if !ErrorLevel
MsgBox, Успешно!
Return

И все координаты прекрасно работают!

WinGetPos в цикл тогда напишу, а то если запустить скрипт с отсутствием ahk_class NAME, то WinGetPos вначале скрипта бесполезен будет после запуска ahk_class NAME.

Round округляет с .5 , сотые, тысячные и т.д. берутся в расчет?

В (даже) русском хелпе написано:

И зачем сотые, тысячные, когда округлять нам надо до целого числа, и единственное что нам интересно, это десятые. Это уже не школьная программа, это детский сад какой то.