Аналог colormode

/// Рабочее нахождение перечеркнутого линиями объекта через Clicerman

SUB(sk, $var)
FOR($a=0,$a<18)
arrpop($var)
$a=$a+1
END_CYC
END_SUB

GETSCREEN // снимок экрана в буфер для анализа
COLORMODE(7)
SCANPXL($ARR_SCAN, 0,0, $_xmax,$_ymax, 8339327)
sk($ARR_SCAN)
while (ARRSIZE($ARR_SCAN)>0)
$y=arrpop($ARR_SCAN)
$x=arrpop($ARR_SCAN)
$p=PXLCOUNT($x-18,$y-18, $x+18,$y+18, 8339327)
IF($p>108)//108
//LOGWRITE("Проверка пикселей $p>165 в $p=", $p)
IF($p<198)//180
$p2=PXLCOUNT($x-18,$y-18, $x+18,$y+18, 12550079)
//LOGWRITE("Проверка пикселей $p<198 в $p=",$p," $p2=",$p2)
IF($p2>68)//68
//LOGWRITE("Проверка пикселей $p2>99 в $p=",$p," $p2=",$p2)
IF($p2<95)//95
$p3=PXLCOUNT($x-18,$y-18, $x+18,$y+18, 4145151)
//LOGWRITE("Проверка пикселей $p2>99 в $p=",$p," $p2=",$p2," $p3=",$p3)
IF($p3>1)//1
LOGWRITE("Проверка пикселей $p3>99 в $p=",$p," $p2=",$p2," $p3=",$p3)
IF($p3<11)//11
LOGWRITE("Биржа найдена в x=",$x," y=",$y," $p=",$p," $p2=",$p2," $p3=",$p3)
END_IF
END_IF
END_IF