Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - gogodanse

Pages: 1 2 3 [4]
46
@hito посмотрите пожалуйста мой набросок

////pack1
$pack1 = "Заголовок окна"
$HTML = HTTPGET ("Сайт")

if (strpos($HTML, "Совпадение текста"))
   if ($pack1 > 0)          <- В этом месте если окно не найдено то скрипт должен выполнятся, если найдено то ничего не делать
      LOGWRITE ("Подстрока найдена")
      LCLICK(1337,393)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(700)
      KEYSTRING($pack1)
      WAITMS(700)
      LCLICK(1484,390)
      WAITMS(700)
      LCLICK(1450,460)
      WAITMS(700)
      KEYSTRING("STR")
      LCLICK(1100,500)
   END_IF
END_IF
WAIT(60)

47
А как найти текст в логе ?  :)

допустим нужно найти текст в логе ? тоесть условие if при котором если находится текст в логе нажимается мышка в определенное место
Code: (clickermann) [Select]
$log = "Это лог, в котором мы проверяем существование - этой подстроки."

if (strpos($log, "этой подстроки"))
   LOGWRITE ("Подстрока найдена")
else
   LOGWRITE ("Подстрока не найдена")
END_IF

HALT

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

Как обычно спасаешь меня <3 лучший, надо бы обновить Справку, для профессионалов это конечно будет очевидно #LOG, а новички откуда знают об этой указке

48
А как найти текст в логе ?  :)

допустим нужно найти текст в логе ? тоесть условие if при котором если находится текст в логе нажимается мышка в определенное место

49
Общие вопросы / Re: HTTPGET
« on: January 05, 2020, 02:10:46 PM »
Code: (clickermann) [Select]
HTTPGET ("http://crapware.aidf.org/")Это команда, отправляющая запрос на страницу по адресу - http://crapware.aidf.org/, и получающая ее код внутренний. Обычно его называют - HTML-кодом.
Code: (clickermann) [Select]
$aУ тебя это переменная, в которую ты помещаешь этот код полученный, но ты его в своем примере нигде не просматриваешь, а вместо него, ты просматриваешь засеченное время, за которое был отправлен запрос на страницу и получен ответ:
Code: (clickermann) [Select]
LOGWRITE ("Пинг: ", $_ms-$ms)Тебе нужно:
Code: (clickermann) [Select]
$HTML = HTTPGET ("http://crapware.aidf.org/")
LOGWRITE ($HTML)
Или вообще в одну строку:
Code: (clickermann) [Select]
LOGWRITE (HTTPGET ("http://crapware.aidf.org/"))Только после нее HALT не забудь поставить ))) А то закалебешься код читать и кликер выключать ))

Просто бог <3  а можно как то сделать чтобы он вырезал только 1 кусок кода, допустим меня интересует текст в блоке див с этим кодом

<yt-formatted-string class="style-scope ytd-video-primary-info-renderer">Started streaming 9 hours ago</yt-formatted-string>


50
Общие вопросы / Re: HTTPGET
« on: January 05, 2020, 12:36:27 AM »
Проблема в том что я не прошу написать скрипт, я хочу сам научится, я прошу объяснить по какому принципу и какой командой можно получить те или иные данные через гет запрос, я не селен в программировании 

Попытался сам найти что-то:

$ms = $_ms
$a = HTTPGET ("http://crapware.aidf.org/")
LOGWRITE ("Пинг: ", $_ms-$ms)
HALT

Получаем пинг сайта, но теперь я не понимаю где список всех таких команд "$ms = $_ms"
И что я вообще могу получить  ???

51
Общие вопросы / Re: HTTPGET
« on: January 04, 2020, 11:28:29 PM »
Если есть те кто помогут буду очень благодарен
Отправляешь запрос на страницу с выключенным плеером и ловишь код страницы. Потом ловишь код страницы со включенным плеером. Потом ищешь межу этими двумя кодами разницу. Проделаешь это еще несколько раз, чтобы разница подтвердилась. В чем тебе помогать-то?
Хотя подозреваю, что деятельность плеера не влияет на код страницы...

Я так понимаю новички тут не приветствуются  :D потому что мой потолок это шаблоны, но спасибо за ответ

52
Общие вопросы / Re: HTTPGET
« on: January 04, 2020, 06:05:09 PM »
Не чего плохого я делать не собираюсь   :D

Просто свой сервис который требует автоматизации

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

53
Общие вопросы / Re: HTTPGET
« on: January 04, 2020, 02:58:08 PM »
Скрипта ещё нету ) просто не вижу смысла писать пока не решу данную задачку )

54
Общие вопросы / HTTPGET
« on: January 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 рандомный канал с ютуба

55
Спасибо то что нужно ! лучший  :-*

56
Понял что скрит останавливается на том моменте когда не может найти картинку start6.bpm тоесть эта та картинка которой нету на экране !!!!!!

57
Заметил что перестает работать только на дедике

На основном пк работает без проблем


А вообще как я понял уважаемый @Oraven эксперт по оптимизации- поможете мне с вариантами ?

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

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

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

Code: [Select]
//// 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)
////////////////////////////////////////////////

Pages: 1 2 3 [4]