GETSCREEN
IF_PIXEL_IN(60,263, 720,867, 1842431)
$x = $_return1 // записываем координаты точки
$y = $_return2
$x0 = $x-5 // отступ от точки
$y0 = $y
WHILE(PXL($x0,$y0) = 16777215) // определяем границы
INC($x0,-1)
END_CYC
$x1 = $x0
$x0 = $x+5
$y0 = $y
WHILE(PXL($x0,$y0) = 16777215)
INC($x0,1)
END_CYC
$x2 = $x0
$x0 = $x
$y0 = $y-5
WHILE(PXL($x0,$y0) = 16777215)
INC($y0,-1)
END_CYC
$y1 = $y0
$x0 = $x
$y0 = $y+5
WHILE(PXL($x0,$y0) = 16777215)
INC($y0,1)
END_CYC
$y2 = $y0
END_IF
LOGWRITE ($x1, ",", $y1, " ", $x2,",", $y2) // результат в лог
HALT