Вопрос В помощи освоения условий Else, WHILE,

[Чольшой Блен]

Неоднократно замечал, что своевременные и дельные ответы форумчан пропадают из тем, а вместо них появляются ответы какого-то оравена.
Думал что люди увидев после своего более полный ответ, просто удаляют самостоятельно, чтоб не плодить повторений в одной теме.
Но вот сегодня столкнулся с тем, что и мои ответы украдены и подменены ответами того-же человека.
Может кто понимающий может объяснить, зачем это делается?
Если для дела, то пойму, но пока такие массовые подмены, мной воспринимаются, как обычное воровство для набора совершенно незаслуженной популярности. Даже если человек уверен, что отвечает правильнее и полнее, то со стороны такая деятельность выглядит очень некрасиво.

[JacsoN]

Неоднократно замечал, что своевременные и дельные ответы форумчан пропадают из тем, а вместо них появляются ответы какого-то оравена.
Думал что люди увидев после своего более полный ответ, просто удаляют самостоятельно, чтоб не плодить повторений в одной теме.
Но вот сегодня столкнулся с тем, что и мои ответы украдены и подменены ответами того-же человека.
Может кто понимающий может объяснить, зачем это делается?
Если для дела, то пойму, но пока такие массовые подмены, мной воспринимаются, как обычное воровство для набора совершенно незаслуженной популярности. Даже если человек уверен, что отвечает правильнее и полнее, то со стороны такая деятельность выглядит очень некрасиво.

к чему  ето сообщение ?   не  понимаю

[JacsoN]

Спасибо  вроди  заработало  хотя  я вчера  Check   убирал не  работало   магия какаято ))

[Hito]

какого-то оравена

Это ты супермодератора называешь каким-то...? )))) Oraven и Vint - это те люди, которые нам - олухам, отвечают наиболее полно и готовыми примерами, без лишних разговоров и уже далеко не первый год.

[Чольшой Блен]

какого-то оравена

Это ты супермодератора называешь каким-то...? )))) Oraven и Vint - это те люди, которые нам - олухам, отвечают наиболее полно и готовыми примерами, без лишних разговоров и уже далеко не первый год.

Не надо, смешивать всё и всех в одну кучу. Я привёл конкретно свой случай, так- как ситуация очень странная.
Олухам может и всё равно, а нормальные форумчане замечают даже скрытое редактирование своих сообщений!
Везде где администрация, что-то подчищает или удаляет, то об этом остаются служебные сообщения, а тут вырезали из твоего сообщения, код и ты выглядишь не опытным программером, а дурачком-балаболкой.
Если кто-то понимает, происходящее и может объяснить, то буду благодарен, если нет, то и ладно везде свои странности и особенности, здесь такие-вот, на других форумах свои.

[JacsoN]

ребята  всем  добрый  день   задача как то произвольно усложнилась (((
    нужно искать слово "БУЛЬВАР" в картинке  3 квадрата (см картинка) и  в каком квадрате  нахожу  слово  в  том  и  продолжаем  скрипт НО
если  нахожу слово "БУЛЬВАР"  и  не  находит  дальше  по скрипту  переходит   заново поиск по квадратам  слова  "БУЛЬВАР"  если нашло  то по списку дальше  и  так  по кругу
 не могу  понять как  ето сделать (((
 у нас к  примеру  во   2  и  3  картинках есть слово  БУЛЬВАР   а   по условию  скрипта к примеру  2 квадрат  слово есть а  дальше нам не  подходит   и мы  ето должны пропустьть не  смотря  что есть найдено БУЛЬВАР  а в 3 квалдрате  есть и  бульвар и  нам  подходит условие  скрипта.   
Тоесть для  чего  надо делить на квадраты  какимто образом  при  нахождении  БУЛЬВАР  нажимало там  где  нашло  а  не   где  попало.

Поправте и простите   если  коряво  обьяснил )

Code: (clickermann) [Select]

SUB(Find_pix, $x, $y, $x1, $y1, $color)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PIXEL_IN($x, $y, $x1, $y1, $color)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         LOGWRITE ("pix fined")
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
end_sub

//Ждем картинку  ===========================================================
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (281,214, 523,1020, "бульвар.bmp")    // слово  ищем
      $check = 1
      LOGWRITE ("есть ! ! !")
     
     
      // ========================================
     
      IF_PICTURE_IN (117,141, 183,1016, "0.bmp")
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
      ELSE                                                // ночь
         IF_PICTURE_IN (117,141, 183,1016, "1.bmp")
            $check = 1
            LCLICK($_return1, $_return2)
            WAITMS(100)
         ELSE
            IF_PICTURE_IN (117,141, 183,1016, "2.bmp")
               $check = 1
               LCLICK($_return1, $_return2)
               WAITMS(100)
            ELSE
               WAITMS(50)
            END_IF
         END_IF
      END_IF
   END_IF
END_CYC

//Если картинка найдена то ищем пиксели итд.
Find_pix(496, 945, 498, 950, 213)  //  Есть
Find_pix(397, 797, 412, 803, 4342338) // Жду
Find_pix(437, 633, 498, 652, 213)    //  есть
Find_pix(464, 699, 489, 711, 213)    //  вроди как  ок нажал
Find_pix(567, 901, 575, 906, 16777215)    // кнопка назад



[Hito]

ребята  всем  добрый  день   задача как то произвольно усложнилась (((

Опять циклы запихнул... Ппц...

[JacsoN]

НУ   цикл  ищет  а  саб    делает  все  ок   было  а  что   изменить  ?

[JacsoN]

ребят   кто  более  точно  проконсультирует  по  поводу моего  вопроса    который в  Ответ 50  написан 

как  реализовать  поиск в  заданных координатах   если  их  может быть  несколько  сразу ?

[JacsoN]

как  правельно  задать  область поиска после   нахождения?  тоесть нужно както  резко  задать  квадрат в  котором нашло первую картинку  и  чтобы   не  вылезло за  приделы  границ тут как я понимаю надо делать переменную а  для меня  ето  как  серпом по яйкам )
К примеру  етот скрипт не  подходит  находит 1 ячейку и  тычит по второй(

Code: (clickermann) [Select]

GETSCREEN
IF_PIXEL_IN(0,0, $_xmax,$_ymax, 2628842)
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 13387583)
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF
END_IF
HALT

[Oraven]

А что тут трудного?

Code: (clickermann) [Select]

GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "file.bmp", -1, 100)
   $x = $_return1 // записываем координаты в переменные
   $y = $_return2
   
   IF_PICTURE_IN ($x-116,$y-51, $y+268,$y+690, "file2.bmp", -1, 100) // ищем в зоне относительно начала красной полоски
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF   
   
END_IF

[JacsoN]

я  просто не  компьютерный  гений  я только  учусьи   мне ето дается  тяжело а  можно попросить  дополнить сообщение  выше   обяснением  как  ты  узнал

Code: (clickermann) [Select]

($x-116,$y-51, $y+268,$y+690,сколько  нужно добавить и  сколько нужно убавить?  пожалусто


и  проблема  если  искать  чисто пиксель... то всеравно   находит  2  картинку  а надо  третья ...

Code: (clickermann) [Select]

GETSCREEN

IF_PIXEL_IN(0,0, $_xmax,$_ymax, 2299883)
   $x =  $_return1
   $y =  $_return2
   
   IF_PIXEL_IN($x-200,$y-200, $y+500,$y+500, 13387583)
     
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF
END_IF
halt


[JacsoN]

ану ребята  подкоректируйте   вроди должно работать

Code: (clickermann) [Select]

SUB(Find_pix, $x, $y, $x1, $y1, $color)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PIXEL_IN($x, $y, $x1, $y1, $color)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         LOGWRITE ("pix fined")
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
end_sub

//Ждем картинку  ===========================================================
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (117,141, 183,1016, "кат.bmp")
      IF_PICTURE_IN ($x-116,$y-51, $y+268,$y+690, "кат.bmp") // тут  не понятно   какая  зона рамки... но вроди работает
         
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         
      END_IF
     
   END_CYC
   
   
   
   //Если картинка найдена то ищем пиксели итд.
   Find_pix(496, 945, 498, 950, 213)  //  Есть
   Find_pix(369, 819, 433, 835, 4342338) // Жду
   
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PICTURE_IN (263,90, 391,1033, " есть.bmp", -1, 100) // ето последнее действие после  САБА
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
      ELSE
         WAITMS(50)
      END_IF
   END_IF
END_CYC


[Oraven]

ану ребята  подкоректируйте   вроди должно работать

Путаница с окончаниями
Так правильно

Code: (clickermann) [Select]

SUB(Find_pix, $x, $y, $x1, $y1, $color)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PIXEL_IN($x, $y, $x1, $y1, $color)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         LOGWRITE ("pix fined")
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
end_sub

//Ждем картинку  ===========================================================
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (117,141, 183,1016, "кат.bmp")
      IF_PICTURE_IN ($x-116,$y-51, $y+268,$y+690, "кат.bmp") // тут  не понятно   какая  зона рамки... но вроди работает
         
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         
      END_IF
   END_IF
END_CYC



//Если картинка найдена то ищем пиксели итд.
Find_pix(496, 945, 498, 950, 213)  //  Есть
Find_pix(369, 819, 433, 835, 4342338) // Жду


$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (263,90, 391,1033, " есть.bmp", -1, 100) // ето последнее действие после  САБА
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC

IF_PICTURE_IN ($x-116,$y-51, $y+268,$y+690, "кат.bmp") // тут  не понятно   какая  зона рамки... но вроди работает

$x и $y до этого не объявлены а значит при первом упоминании будут 0
итого зона поиска будет такой
-116,-51, 268,690

[JacsoN]

так  товариш оравен   подкоректировал скрипт ваш  под  себя .можно   очень   подробно  про  строку 21  22  23

Code: (clickermann) [Select]

$x-116,$y-51, $y+268,$y+690 как  найти  правельно  кординаты  которые  вводить зону  поиска   может  какойто пример порекомендуете?

Code: (clickermann) [Select]

SUB(Find_pix, $x, $y, $x1, $y1, $color)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PIXEL_IN($x, $y, $x1, $y1, $color)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
         LOGWRITE ("pix fined")
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
end_sub

//Ждем картинку  ===========================================================
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (112,211, 553,1037, "аптека.bmp")
      $x =  $_return1
      $y =  $_return2
      IF_PICTURE_IN ($x-116,$y-51, $y+268,$y+690, "1.bmp") // тут  не понятно   какая  зона рамки... но вроди работает
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
      END_IF
   END_IF
END_CYC



//Если картинка найдена то ищем пиксели итд.
Find_pix(496, 945, 498, 950, 213)  //  Есть
Find_pix(369, 819, 433, 835, 4342338) // Жду


$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (263,90, 391,1033, "Есть.bmp", -1, 100) // ето последнее действие после  САБА
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC