getscreen
scanpicture($var, 0, 0, $_xmax, $_ymax, "picture1.bmp")
$2=arrpop($var)
$1=arrpop($var)
$levo=$1-30
scanpicture($var, 0, 0, $_xmax, $_ymax, "picture2.bmp")
$4=arrpop($var)
$3=arrpop($var)
$verh=$4-10
scanpicture($var, 0, 0, $_xmax, $_ymax, "picture3.bmp")
$6=arrpop($var)
$5=arrpop($var)
$pravo=$5+40
scanpicture($var, 0, 0, $_xmax, $_ymax, "picture4.bmp")
$str2 = arrpop($var)
$str1 = arrpop($var)
$niz=$str2+140
print($levo, " ", $pravo, " ", $verh, " ", $niz)
halt
Это была одна попытка. Работает на всех машинах, кроме упомянутой. Специально попробовал еще так:
getscreen
if_picture_in(0, 0, $_xmax, $_ymax, "picture1.bmp", -1, 60)
$1=$_return1
$2=$_return2
$levo=$1-30
end_if
if_picture_in(0, 0, $_xmax, $_ymax, "picture2.bmp", -1, 60)
$3=$_return1
$4=$_return2
$verh=$4-10
end_if
if_picture_in(0, 0, $_xmax, $_ymax, "picture3.bmp", -1, 60)
$5=$_return1
$6=$_return2
$pravo=$5+40
end_if
if_picture_in(0, 0, $_xmax, $_ymax, "picture4.bmp", -1, 60)
$str1 = $_return1
$str2 = $_return2
$niz=$str2+140
end_if
print($levo, " ", $pravo, " ", $verh, " ", $niz)
halt
Тот же вариант - все по нулям.