Opt('MustDeclareVars', 1)
Global $sColor, $sColorGet, $iX, $iY
$sColor = '0f0f0f'
$iX = 200
$iY = 200
Do
; получение цвета в точке в формате RRGGGBBB
$sColorGet = StringLower(Hex(PixelGetColor(200, 200), 6))
; проверка полученного цвета на совпадение с заданным
If $sColorGet == $sColor Then
_Move1()
Else
_Move2()
EndIf
Until MsgBox(32+4, 'Внимание', 'Повторить проверку?') <> 6
; функция выполняется если цвета совпали
Func _Move1()
MsgBox(64, 'Внимание', 'Цвет в указанной точке совпал с заданным' &@CRLF& 'Выполняется движение № 1' &@CRLF&@CRLF& 'Искомый цвет: ' & $sColor &@CRLF& 'Найденный цвет: ' & $sColorGet)
EndFunc
; функция выполняется если цвета не совпали
Func _Move2()
MsgBox(48, 'Внимание', 'Цвет в указанной точке не совпал с заданным' &@CRLF& 'Выполняется движение № 2' &@CRLF&@CRLF& 'Искомый цвет: ' & $sColor &@CRLF& 'Найденный цвет: ' & $sColorGet)
EndFunc