День добрый уважаемые товарищи и не товарищи.
В устройстве программ не знаю даже азов.
Познакомился с вашим творением Clickermann 4,7 недели две назад.
Просто балдею от этой программы сижу в ней все свои выходные это прикольно тремя инструментами строишь пиромиду хеопса, из констрктора лего собираешь ферари.
Программа классная.
$obl_x1 = 417
$y3 = 539
$obl_x2 = 546
$obl_y2 = 654
GETSCREEN
COLORMODE(1, $obl_x1,$y3, $obl_x2, $obl_y2)
IF_PIXEL_IN ($obl_x1,$y3, $obl_x2,$obl_y2, 16777215)
print( "X=", $_return1, ", Y3=", $_return2)
// Подсчёт количества писилей под коодинатами
$x1 = $_return1-116
$y1 = $_return2-56
$x2 = $_return1+31
$y2 = $_return2+46
LOGWRITE (" Исходная " ,$_return1)
$Pixcily = PXLCOUNT ($x1, $y1, $x2, $y2, 16777215)
LOGWRITE ("Количество пиксилей " ,$Pixcily)
//координаты подсчёта др цвета------------------------------------------
( Координате $_return1 - присваиваеться значение - $Pixcily , $_return2 - не изменяется,
как бы переменные не менял и $count ставил всяко разно - присваивает и всё. В др. скриптах я это по другому обходил, то есть $X = $_return1 +56 , ниже где мне надо было восполизавться этой переменной писал $B = $X - 56, Этот скрипт рабочий только убрать этот коментарий .Соорентирован произвольно для наглядности, поиск белого цвета. Ниже скрипт как я решил эту проблемму , искал причину не правильных данных часа три. Уже второй раз с этим столкнулся всё как с нуля. )
$xzolty = $_return1 - 125
$yzolty = $_return2 - 44
$xzolty2 = $_return1 + 61
$yzolty2 = $_return2 + 72
LOGWRITE (" После присвоения, изменёная. -" , $_return1)
END_IF
HALT
$obl_x1 = 417
$y3 = 539
$obl_x2 = 546
$obl_y2 = 654
GETSCREEN
COLORMODE(1, $obl_x1,$y3, $obl_x2, $obl_y2)
IF_PIXEL_IN ($obl_x1,$y3, $obl_x2,$obl_y2, 16777215)
print( "X=", $_return1, ", Y3=", $_return2)
// Подсчёт количества писилей под коодинатами
$x1 = $_return1-116
$y1 = $_return2-56
$x2 = $_return1+31
$y2 = $_return2+46
$xzolty = $_return1 - 125
$yzolty = $_return2 - 44
$xzolty2 = $_return1 + 61
$yzolty2 = $_return2 + 72
LOGWRITE (" Исходная " ,$_return1)
$Pixcily = PXLCOUNT ($x1, $y1, $x2, $y2, 167772 15)
LOGWRITE ("Количество пиксилей " ,$Pixcily)
//координаты подсчёта др цвета------------------------------------------
LOGWRITE (" После присвоения, изменёная. -" , $_return1)
END_IF
HALT
Большая благодарность автору.
