Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Темы - gogodanse

Страницы: [1]
1
Добрый день, делают бота чтобы хоть немного упростить себе работу, прошу проверить и где не хватает подсказать или поправить меня

$HTML = HTTPGET ("Ссылка") //// Бот отправляет запрос httpget
if ((strpos($HTML, "СЛОВО") > 0)) /// Если бот находит слово в полученном коде
   if(wndfind(ОКНО) = 0)  /// И если окно не найдено то делаем действия для открытия

 Для открытия над понадобится айди из этого же кода который мы получили HTML

Теперь нужно скопировать в буфер этот кусочек кода  Ищем строчку и вырезаем кусок кода  (тут мне нужна помощь, каким лучше методом вытащить кусок кода, допустим он будет в 6 строчке и после слов id="Наш код")

 Открываем окно бла бла бла вставляем айди жмем старт

   END_IF
ELSE
   if(wndfind($ОКНО) > 0) /// Если окно найдено а слово не найдено то закрываем все

      Действия для закрытия окна

   END_IF
END_IF

 :o  :o  :o  :o


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


$HTML = HTTPGET ("ссылка")
if ((strpos($HTML, "NU LIVE") > 0) | (strpos($HTML, "NU LIVE") > 0)) /// Ищем слово NU LIVE если найдено то включаем (первое условие)
   if(пиксель ищем) = 0) /// Если пиксель не найден то включаем (второе условие условие)
   Выполняем действия по включению
   END_IF
ELSE
   if(wndfind($pack1) > 0) /// Если не выполнены условия то выключаем
      LCLICK(375,52)
   END_IF
END_IF

Теперь надо немного изменить

Теперь нужно:
Получить html и отправить данные в лог
Ищем так же слово NU LIVE и Пиксель
Если условия оба выполнены: Ищем в логе "channelid=2342342"
Берем и цифры после channelid= вписываем в переменную "2342342
И уже с этими цифрами выполняем определенное действие

Друзья есть кто шарит за логи html ? 

3
Общие вопросы / работа с PID
« : Апрель 10, 2020, 01:51:13 am »
Добрый день!

Так и не нашел ни одной темы на форуме с значением PID и возможно ли это ?

В шаблонах вижу что есть какие то команды, а вот как насчет работы уже с самим окном ?

Допустим я знаю PID окна, и у меня таких окон 4-6 и на каждом этапе цикла мне нужно чтобы он нажимал левой кнопкой мышки по координатам внутри этого PID

Реально ? если да киньте пример буду очень благодарен

4
Общие вопросы / Проблема с httpget
« : Январь 15, 2020, 09:26:33 pm »
Первые 3 дня все было хорошо

Теперь перестал определять нужные слова в полученном коде не понимаю почему

Вроде другие слова ищет а фразы которые были нет

Может как то юзер агента можно ему прописать ?

5
Общие вопросы / HTTPGET
« : Январь 04, 2020, 07:29:43 am »
Добрый день !

Уважаемые эксперты решите мою задачку прошу  :)

Есть страница стрима ютуб, нужно чтобы бот определял онлайн ли (проигрывается ли плеер) и выполняю функцию

if HTTPGET https://www.youtube.com/channel/UCbwF5qItDGG6Owp3oXjszbg/live "параметр определения онлайн" - выполняет действия
if HTTPGET https://www.youtube.com/channel/UCbwF5qItDGG6Owp3oXjszbg/live "Если канал оффлайн - выполнят другие действия

*https://www.youtube.com/channel/UCbwF5qItDGG6Owp3oXjszbg/live рандомный канал с ютуба

6
Общие вопросы / Скрит перестает работать
« : Ноябрь 23, 2019, 01:44:43 am »
Добрый день, накатал себе скрипт для автоматизации, но я в этом ньюфаг поэтому скрипт мусорный и водный

помощи по оптимизации не прошу, комп справляется на ура

но есть вопрос первые дни все работало нормально а теперь не знаю может что изменил и скрипт в рандомное время перестает работать хотя паузы не стоит, он просто не делает скрин экрана

//// 20.11.2019
#name "t"

////////////////////////////////////////////////
//pack1
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start1.bmp")
   IF_PIXEL_IN(155,130, 155,130, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("Uggfd")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek001")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("1"), 35,32)
      WNDSIZE(WNDFIND("1"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop1.bmp")
   WHILE(PXL (195,104) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(250,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack2
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start2.bmp")
   IF_PIXEL_IN(422,130, 422,130, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("Udfgdfgtreytry")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek002")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("2"), 291,33)
      WNDSIZE(WNDFIND("2"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop2.bmp")
   WHILE(PXL (447,112) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(503,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack3
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start3.bmp")
   IF_PIXEL_IN(675,117, 675,117, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCrnert")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek003")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("3"), 548,32)
      WNDSIZE(WNDFIND("3"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop3.bmp")
   WHILE(PXL (709,109) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(762,44)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack4
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start4.bmp")
   IF_PIXEL_IN(920,110, 920,110, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCtyjtyjty")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek004")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("4"), 805,33)
      WNDSIZE(WNDFIND("4"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop4.bmp")
   WHILE(PXL (978,94) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1013,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack5
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start5.bmp")
   IF_PIXEL_IN(1176,112, 1176,122, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCwFRr457")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek005")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("5"), 1062,32)
      WNDSIZE(WNDFIND("5"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop5.bmp")
   WHILE(PXL (1224,109) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1275,41)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack6
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start6.bmp")
   IF_PIXEL_IN(160,320, 160,320, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("U234435Q")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek006")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("6"), 35,235)
      WNDSIZE(WNDFIND("6"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop6.bmp")
   WHILE(PXL (200,310) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(246,247)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack7
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start7.bmp")
   IF_PIXEL_IN(430,325, 430,325, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC37k67k67CQ")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek007")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("7"), 292,234)
      WNDSIZE(WNDFIND("7"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop7.bmp")
   WHILE(PXL (460,303) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(508,248)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack8
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start8.bmp")
   IF_PIXEL_IN(675,320, 675,320, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC567567BMjYSaw")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek008")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("8"), 549,234)
      WNDSIZE(WNDFIND("8"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop8.bmp")
   WHILE(PXL (710,310) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(760,245)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack9
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start9.bmp")
   IF_PIXEL_IN(920,320, 920,320, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCQiKHRV45645-Q")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek009")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("9"), 805,234)
      WNDSIZE(WNDFIND("9"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop9.bmp")
   WHILE(PXL (975,300) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1018,244)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack10
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start10.bmp")
   IF_PIXEL_IN(1210,317, 1210,317, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCzvj0w5645KOqBQ")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek010")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("10"), 1062,235)
      WNDSIZE(WNDFIND("10"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop10.bmp")
   WHILE(PXL (1223,306) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1273,247)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack23
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start23.bmp")
   IF_PIXEL_IN(695,916, 695,916, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC78778A")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek023")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("23"), 549,841)
      WNDSIZE(WNDFIND("23"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop23.bmp")
   WHILE(PXL (725,906) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(755,853)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack24
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start24.bmp")
   IF_PIXEL_IN(928,906, 928,906, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCzo87978qQT8Mg")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek024")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("24"), 806,842)
      WNDSIZE(WNDFIND("24"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop24.bmp")
   WHILE(PXL (970,902) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1016,853)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack25
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start25.bmp")
   IF_PIXEL_IN(1203,923, 1203,923, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("U6868689")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek025")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("25"), 1062,841)
      WNDSIZE(WNDFIND("25"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop25.bmp")
   WHILE(PXL (1238,906) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1287,849)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

Страницы: [1]