Вот так по прямому, как показал kiril, самое разумное. Если не нужно много редактировать и поисков разумное количество.
Ещё один вариант
SUB(IPI, $x1, $y1, $x2, $y2, $color)
IF($find = 1)
IF_PIXEL_IN($x1,$y1, $x2,$y2, $color)
ELSE
$find = 0
END_IF
END_IF
END_SUB
$find = 1
GETSCREEN
IPI(0,698, 30,722, 3814898)
IPI(35,698, 65,722, 3683569)
IPI(65,698, 95,722, 3814898)
IPI(95,698, 130,722, 3683569)
IPI(130,698, 160,722, 3814898)
IPI(165,698, 195,722, 3683569)
IPI(195,698, 225,722, 3814898)
IPI(225,698, 260,722, 3683569)
IPI(260,698, 290,722, 3814898)
IPI(295,698, 325,722, 3683569)
IF($find = 1)
WAITMS(1000)
BEEP(200,1000)
END_IF
WAITMS(2000)
Можно ещё придумать.