« previous next »
Pages: 1 2 [3] 4 5 6

Author Topic: Вопрос В помощи освоения условий Else, WHILE,  (Read 19084 times)

0 Members and 2 Guests are viewing this topic.

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #30 on: January 11, 2020, 09:44:53 PM »
Вот так   искать  несколько  картинок ?   и  если  да  то  тут  нужны  Wait? или  поубирать? 
Code: (clickermann) [Select]
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
      ELSE
         IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
            $check = 1
            LCLICK($_return1, $_return2)
            WAITMS(100)
         ELSE
            WAITMS(50)
         END_IF
      END_CYC
     
      $check = 0
      WHILE($check = 0)
         GETSCREEN
         IF_PIXEL_IN(711,389, 773,956, 113282)
            $check = 1
            LCLICK($_return1, $_return2)
            WAITMS(100)
         ELSE
            WAITMS(50)
         END_IF
      END_CYC
  а  как тут  теперь  скорость поиска?  дольше  искать  будет ?    может  выгоднее  запустить  несколько Кликерманов?
« Last Edit: January 11, 2020, 10:00:22 PM by JacsoN »
Logged
если  есть  возможность  объясни  по  скайпу  что  да  как

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #31 on: January 11, 2020, 10:19:47 PM »
Не верные параметры в заголовке подпрограммы
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check = 0)

Кликер не поддерживает пока присвоение переменным значения.
Правильно так:
Code: (clickermann) [Select]
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check)Но в случаи того скрипта $check там вообще нельзя писать, та как в вызове нет такого параметра. Отсюда и ошибка.

На счет твоего скрипта верно так
Code: (clickermann) [Select]
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
         $check = 1
         LCLICK($_return1, $_return2)
         WAITMS(100)
      ELSE
         IF_PICTURE_IN (506,393, 779,1008, "zp.bmp", -1, 100)
            $check = 1
            LCLICK($_return1, $_return2)
            WAITMS(100)
         ELSE
            WAITMS(50)
         END_IF
      END_IF
   END_IF
END_CYC

$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PIXEL_IN(711,389, 773,956, 113282)
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC
Logged

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #32 on: January 11, 2020, 10:22:23 PM »
Quote from: JacsoN on January 11, 2020, 09:44:53 PM
а  как тут  теперь  скорость поиска?  дольше  искать  будет ?    может  выгоднее  запустить  несколько Кликерманов?

Искать будет картинки друг за другом, пока не совпадет. Скорость зависит от размера области поиска и размера картинки поиска.
Logged

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #33 on: January 11, 2020, 10:24:42 PM »
Quote from: Oraven on January 11, 2020, 10:22:23 PM
Quote from: JacsoN on January 11, 2020, 09:44:53 PM
а  как тут  теперь  скорость поиска?  дольше  искать  будет ?    может  выгоднее  запустить  несколько Кликерманов?

Искать будет картинки друг за другом, пока не совпадет. Скорость зависит от размера области поиска и размера картинки поиска.
Размер  картинки 1x30-50 пикселей в  длину  примерно  такая  картинка , а  еще  что скажешь  из  личного  опыта  2- запущенных  кликермана   медленнее  будут  работать   чем 1 нос  полным  кодом?  то есть  если  в  каждом кликермане  задать  область  допустим 1 половина  экрана и 2   вторая  половина экрана
« Last Edit: January 11, 2020, 10:28:36 PM by JacsoN »
Logged
если  есть  возможность  объясни  по  скайпу  что  да  как

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #34 on: January 12, 2020, 02:45:16 PM »
Народ кто шарит может кинуть правильно смысл

(strpos($Масив в котором ищем, "Фраза1", "Фраза2"))

Выдает ошибку, что не так ?

Мне нужно чтобы он любую из двух фраз искал, а не обе сразу
« Last Edit: January 12, 2020, 03:09:52 PM by gogodanse »
Logged

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #35 on: January 12, 2020, 04:28:04 PM »
Quote from: gogodanse on January 12, 2020, 02:45:16 PM
Народ кто шарит может кинуть правильно смысл

(strpos($Масив в котором ищем, "Фраза1", "Фраза2"))

Выдает ошибку, что не так ?

Мне нужно чтобы он любую из двух фраз искал, а не обе сразу

Clickermann -> Справка -> Язык сценариев -> Строки и строковые файлы -> strpos
strpos вроде только одну подстроку ищет...
Logged
Я не ду... Потому и не бу...

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #36 on: January 12, 2020, 05:32:22 PM »
Quote from: Hito on January 12, 2020, 04:28:04 PM
Quote from: gogodanse on January 12, 2020, 02:45:16 PM
Народ кто шарит может кинуть правильно смысл

(strpos($Масив в котором ищем, "Фраза1", "Фраза2"))

Выдает ошибку, что не так ?

Мне нужно чтобы он любую из двух фраз искал, а не обе сразу

Clickermann -> Справка -> Язык сценариев -> Строки и строковые файлы -> strpos
strpos вроде только одну подстроку ищет...

А если два условия поставить это будет бред ?

Допустим:

(strpos($Масив в котором ищем, "Фраза1"))
(strpos($Масив в котором ищем, "Фраза2"))
Logged

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #37 on: January 12, 2020, 05:57:07 PM »
Quote from: gogodanse on January 12, 2020, 05:32:22 PM
Quote from: Hito on January 12, 2020, 04:28:04 PM
Quote from: gogodanse on January 12, 2020, 02:45:16 PM
Народ кто шарит может кинуть правильно смысл

(strpos($Масив в котором ищем, "Фраза1", "Фраза2"))

Выдает ошибку, что не так ?

Мне нужно чтобы он любую из двух фраз искал, а не обе сразу

Clickermann -> Справка -> Язык сценариев -> Строки и строковые файлы -> strpos
strpos вроде только одну подстроку ищет...

А если два условия поставить это будет бред ?

Допустим:

(strpos($Масив в котором ищем, "Фраза1"))
(strpos($Масив в котором ищем, "Фраза2"))
Code: (clickermann) [Select]
// Так ищем обе подстроки
IF(strpos($stroka, "Фраза1"))
   IF(strpos($stroka, "Фраза2"))
      LOGWRITE ("Обе подстроки найдены")
   END_IF
END_IF
// А так ищем любую из подстрок
$flag = 0
IF(strpos($stroka, "Фраза1"))
   $flag = 1
else
   IF(strpos($stroka, "Фраза2"))
      $flag = 1
   END_IF
END_IF

IF($flag)
   LOGWRITE ("Одна из подстрок, или обе присутствуют.")
END_IF
« Last Edit: January 12, 2020, 06:04:29 PM by Hito »
Logged
Я не ду... Потому и не бу...

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #38 on: January 12, 2020, 07:27:27 PM »
Quote from: Hito on January 12, 2020, 05:57:07 PM
Quote from: gogodanse on January 12, 2020, 05:32:22 PM
Quote from: Hito on January 12, 2020, 04:28:04 PM
Quote from: gogodanse on January 12, 2020, 02:45:16 PM
Народ кто шарит может кинуть правильно смысл

(strpos($Масив в котором ищем, "Фраза1", "Фраза2"))

Выдает ошибку, что не так ?

Мне нужно чтобы он любую из двух фраз искал, а не обе сразу

Clickermann -> Справка -> Язык сценариев -> Строки и строковые файлы -> strpos
strpos вроде только одну подстроку ищет...

А если два условия поставить это будет бред ?

Допустим:

(strpos($Масив в котором ищем, "Фраза1"))
(strpos($Масив в котором ищем, "Фраза2"))
Code: (clickermann) [Select]
// Так ищем обе подстроки
IF(strpos($stroka, "Фраза1"))
   IF(strpos($stroka, "Фраза2"))
      LOGWRITE ("Обе подстроки найдены")
   END_IF
END_IF
// А так ищем любую из подстрок
$flag = 0
IF(strpos($stroka, "Фраза1"))
   $flag = 1
else
   IF(strpos($stroka, "Фраза2"))
      $flag = 1
   END_IF
END_IF

IF($flag)
   LOGWRITE ("Одна из подстрок, или обе присутствуют.")
END_IF

Блин не хотел я else использовать :((( ну ладно спасибо hit <3 как обычно выручил, щас ещё подумаю если что дак этот использую
Logged

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #39 on: January 12, 2020, 07:40:44 PM »
Quote from: gogodanse on January 12, 2020, 07:27:27 PM
Блин не хотел я else использовать :(((
А чем else тебе не нравится...?
Logged
Я не ду... Потому и не бу...

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #40 on: January 12, 2020, 07:48:02 PM »
Quote from: Hito on January 12, 2020, 07:40:44 PM
Quote from: gogodanse on January 12, 2020, 07:27:27 PM
Блин не хотел я else использовать :(((
А чем else тебе не нравится...?

Посмотри пожалуйста

$pack1 = "Окно1"
$close1 = WNDFIND("Окно1")
$HTML = HTTPGET ("Ссылка на сайт")
if (strpos($HTML, "Фраза 1")) если фраза найдена
   if(wndfind($pack1)) // если окно не открыто
   else
Выполняем действия для открытия окна
   END_IF
END_IF

if (strpos($HTML, "Фраза1")) Тут через else тоесть если фраза не найдена
else
   if(wndfind($pack1))  А окно открыто
Выполняем действия для закрытия окна
   END_IF
END_IF

Дак вот я понял что на сайте может быть 2 разные фразы, и мне нужно сделать так чтобы он искал обе фразы
« Last Edit: January 12, 2020, 07:50:42 PM by gogodanse »
Logged

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #41 on: January 12, 2020, 09:55:12 PM »
Quote from: gogodanse on January 12, 2020, 07:27:27 PM
Блин не хотел я else использовать :((( ну ладно спасибо hit <3 как обычно выручил, щас ещё подумаю если что дак этот использую

вот тебе без ELSE, в чем проблема то?..
Code: (clickermann) [Select]
// Так ищем обе подстроки
IF((strpos($stroka, "Фраза1") > 0) & (strpos($stroka, "Фраза2") > 0))
   LOGWRITE ("Обе подстроки найдены")
END_IF

// А так ищем любую из подстрок
IF((strpos($stroka, "Фраза1") > 0) | (strpos($stroka, "Фраза2") > 0))
   LOGWRITE ("Одна из подстрок, или обе присутствуют.")
END_IF

Quote from: gogodanse on January 12, 2020, 07:48:02 PM
Посмотри пожалуйста

$pack1 = "Окно1"
$close1 = WNDFIND("Окно1")
$HTML = HTTPGET ("Ссылка на сайт")
if (strpos($HTML, "Фраза 1")) если фраза найдена
   if(wndfind($pack1)) // если окно не открыто
   else
Выполняем действия для открытия окна
   END_IF
END_IF

if (strpos($HTML, "Фраза1")) Тут через else тоесть если фраза не найдена
else
   if(wndfind($pack1))  А окно открыто
Выполняем действия для закрытия окна
   END_IF
END_IF

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

Code: (clickermann) [Select]
$pack1 = "Окно1"
$close1 = WNDFIND("Окно1")
$HTML = HTTPGET ("Ссылка на сайт")
if ((strpos($HTML, "Фраза 1") > 0) | (strpos($HTML, "Фраза 2") > 0)) // если фраза найдена
   if(wndfind($pack1) = 0) // если окно не открыто
      // Выполняем действия для открытия окна
   END_IF
ELSE // Тут через else тоесть если фраза не найдена
   if(wndfind($pack1) > 0)  // А окно открыто
      // Выполняем действия для закрытия окна
   END_IF   
END_IF
« Last Edit: January 12, 2020, 10:04:12 PM by Oraven »
Logged

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #42 on: January 12, 2020, 11:51:23 PM »
Quote from: Oraven on January 12, 2020, 09:55:12 PM
Quote from: gogodanse on January 12, 2020, 07:27:27 PM
Блин не хотел я else использовать :((( ну ладно спасибо hit <3 как обычно выручил, щас ещё подумаю если что дак этот использую

вот тебе без ELSE, в чем проблема то?..
Code: (clickermann) [Select]
// Так ищем обе подстроки
IF((strpos($stroka, "Фраза1") > 0) & (strpos($stroka, "Фраза2") > 0))
   LOGWRITE ("Обе подстроки найдены")
END_IF

// А так ищем любую из подстрок
IF((strpos($stroka, "Фраза1") > 0) | (strpos($stroka, "Фраза2") > 0))
   LOGWRITE ("Одна из подстрок, или обе присутствуют.")
END_IF

Quote from: gogodanse on January 12, 2020, 07:48:02 PM
Посмотри пожалуйста

$pack1 = "Окно1"
$close1 = WNDFIND("Окно1")
$HTML = HTTPGET ("Ссылка на сайт")
if (strpos($HTML, "Фраза 1")) если фраза найдена
   if(wndfind($pack1)) // если окно не открыто
   else
Выполняем действия для открытия окна
   END_IF
END_IF

if (strpos($HTML, "Фраза1")) Тут через else тоесть если фраза не найдена
else
   if(wndfind($pack1))  А окно открыто
Выполняем действия для закрытия окна
   END_IF
END_IF

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

Code: (clickermann) [Select]
$pack1 = "Окно1"
$close1 = WNDFIND("Окно1")
$HTML = HTTPGET ("Ссылка на сайт")
if ((strpos($HTML, "Фраза 1") > 0) | (strpos($HTML, "Фраза 2") > 0)) // если фраза найдена
   if(wndfind($pack1) = 0) // если окно не открыто
      // Выполняем действия для открытия окна
   END_IF
ELSE // Тут через else тоесть если фраза не найдена
   if(wndfind($pack1) > 0)  // А окно открыто
      // Выполняем действия для закрытия окна
   END_IF   
END_IF

Я так понимаю это оптимизация моего кода D:

Все было так просто , спасибо большое  ::)
Logged

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #43 on: April 23, 2020, 10:27:45 PM »
Quote from: Oraven on January 11, 2020, 10:19:47 PM
Не верные параметры в заголовке подпрограммы
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check = 0)

Кликер не поддерживает пока присвоение переменным значения.
Правильно так:
Code: (clickermann) [Select]
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check)Но в случаи того скрипта $check там вообще нельзя писать, та как в вызове нет такого параметра. Отсюда и ошибка.
Всем  привет   вот    я внес  изминения  по твоим  рекомендациям  и всеравно  такое  высвечивается  скрин  Ниже   подскажите  как  проправить   чтобы  работало  на  ура
 
Code: (clickermann) [Select]
//Оптимизируем код так как он повторяется 6 раз
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check)
   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, "2.bmp")
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      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
         WAITMS(50)
       END_IF
END_IF
   END_IF
END_CYC


//Если картинка найдена то ищем пиксели итд.
Find_pix(496, 945, 498, 950, 213)  //  Есть
Find_pix(397, 797, 412, 803, 213) // Жду
Find_pix(462, 636, 485, 642, 213)   //  есть
с  сабами  не  работал  никогда  для меня  все новое   пока  разбираюсь
Logged
если  есть  возможность  объясни  по  скайпу  что  да  как

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Вопрос В помощи освоения условий Else, WHILE,
« Reply #44 on: April 24, 2020, 06:39:37 AM »
Quote from: JacsoN on April 23, 2020, 10:27:45 PM
   подскажите  как  проправить   чтобы  работало  на  ура

Количество параметров в вызове меньше чем установленных переменных в заголовке подпрограммы.
Code: (clickermann) [Select]
Find_pix(496, 945, 498, 950, 213)
Code: (clickermann) [Select]
SUB(Find_pix, $x, $y, $x1, $y1, $color, $check)
Code: (clickermann) [Select]
//Оптимизируем код так как он повторяется 6 раз
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, "2.bmp")
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   ELSE
      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
            WAITMS(50)
         END_IF
      END_IF
   END_IF
END_CYC


//Если картинка найдена то ищем пиксели итд.
Find_pix(496, 945, 498, 950, 213)  //  Есть
Find_pix(397, 797, 412, 803, 213) // Жду
Find_pix(462, 636, 485, 642, 213)   //  есть
Logged
Pages: 1 2 [3] 4 5 6
« previous next »