HotKeySet("{RButton}","_Exit")
While 1
$Variable = PixelSearch(625, 500, 651, 519, 0x000000)
If IsArray($Variable) = True Then
   MouseMove($Variable[0], $Variable [1],1)
   MouseClick("LEFT")
EndIf
WEnd
Func _Exit()
   Exit
EndFunc

~RButton::
    while GetKeyState("RButton", "P") {
		CoordMode, Pixel, Screen
        CoordMode, Mouse, Screen
        PixelSearch,OutputVarX, OutputVarY, 625, 500, 651, 519, 0x000000, 3, Fast
		Sleep 10
        if !ErrorLevel {
            MouseMove, OutputVarX, OutputVarY
		Sleep 10
	    }
    }
    return

1:
loop {
MouseGetPos, MouseX, MouseY
PixelGetColor, color, %MouseX%, %MouseY%
ToolTip %color%
Sleep 10
}
return

~MButton::
    while GetKeyState("MButton", "P") {
	  CoordMode, Pixel, Screen
	  CoordMode, Mouse, Screen
      PixelGetColor, color, 636, 506, 646, 518
	  Sleep, 10
	   if color in 0x0000FF,0x00008B,0x5C5CCD
      MouseMove, 636, 506
      Sleep, 10
    }
    return

~MButton::
    while GetKeyState("MButton", "P") {
        PixelSearch,,, 636, 506, 646, 518, 0x000000
        if !ErrorLevel {
            MouseMove, тут возник вопрос
            Sleep 20
        }
    }
    return