Умники и умницы ХЭЭЭЛП

[gogodanse]

1.Получаем HTTPGET
2.Если находим нужные слова получаем айди
3.Ищем в коде строчку с масивом "videoId\":\"P_nlzisJQac\" жирным выделен айди
4.Нашли и копируем в буфер обмена

Накидал код но прога вылетает с ошибкой, значит ошибка у меня в мозгу


$HTML = HTTPGET ("https://www.youtube.com/watch?v=P_nlzisJQac")
if ((strpos($HTML, "СЕЙЧАС СМОТРЯТ:") > 0) | (strpos($HTML, "НАЧАЛАСЬ") > 0))
$str = TFREAD($HTML)
STRSEPARATE($str, STRCONCAT(CHAR(34), "videoId", CHAR(34), ":"), $arr)
$our_code = STRFILTER($arr[1], CHAR(34), 0)
LOGWRITE ($our_code) //
END_IF
HALT

[gogodanse]

$var = HTTPGET("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live")

 
STRSEPARATE($var, STRCONCAT(CHAR(34), "videoId", CHAR(34), ":" ), $arr)

$our_code = STRFILTER($arr[1], CHAR(34), 0)
 
LOGWRITE ($our_code)

HALT

В логе появляется айди но сразу после него лишний хлам

[Vint]

У меня с ютуба вообще не получает ответ.

Code: (clickermann) [Select]

$template = STRCONCAT(CHAR(34), "videoId\", CHAR(34), ":" )
$start = STRPOS($var, $template) + 13
$end = STRPOS($var, "\", $start) - 1
$our_code = STRCUT2($var, $start, $end)

[gogodanse]

У меня с ютуба вообще не получает ответ.

Code: (clickermann) [Select]

$template = STRCONCAT(CHAR(34), "videoId\", CHAR(34), ":" )
$start = STRPOS($var, $template) + 13
$end = STRPOS($var, "\", $start) - 1
$our_code = STRCUT2($var, $start, $end)

.dll для чтения сертификата https закидывал ?

[gogodanse]

У меня просто софт закрывается с ошибкой

[gogodanse]

Есть у кого идеи ?

[Vint]

.dll для чтения сертификата https закидывал ?

Нет. Теперь закинул.
Оно мне без надобности было, я подобные вещи на кликере не делаю.

[Vint]

Подожди, подожди. А мой пример? У меня всё работает. Там нечему закрываться с ошибкой.

Code: (clickermann) [Select]

$var = HTTPGET("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live")

$template = STRCONCAT(CHAR(34), "videoId\", CHAR(34), ":" )
$start = STRPOS($var, $template) + 13
$end = STRPOS($var, "\", $start) - 1
$our_code = STRCUT2($var, $start, $end)

LOGWRITE($our_code)
HALT
лог

Code: [Select]

14:58:13 XOuXIlN5MAI

[gogodanse]

Подожди, подожди. А мой пример? У меня всё работает. Там нечему закрываться с ошибкой.

Code: (clickermann) [Select]

$var = HTTPGET("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live")

$template = STRCONCAT(CHAR(34), "videoId\", CHAR(34), ":" )
$start = STRPOS($var, $template) + 13
$end = STRPOS($var, "\", $start) - 1
$our_code = STRCUT2($var, $start, $end)

LOGWRITE($our_code)
HALT
лог

Code: [Select]

14:58:13 XOuXIlN5MAI

Сигнатура проблемы:
  Имя события проблемы:   APPCRASH
  Имя приложения:   Clickermann.exe
  Версия приложения:   4.13.0.0
  Отметка времени приложения:   5afc1cad
  Имя модуля с ошибкой:   Clickermann.exe
  Версия модуля с ошибкой:   4.13.0.0
  Отметка времени модуля с ошибкой:   5afc1cad
  Код исключения:   c0000005
  Смещение исключения:   0000b716
  Версия ОС:   6.3.9600.2.0.0.272.79
  Код языка:   1049
  Дополнительные сведения 1:   87cd
  Дополнительные сведения 2:   87cd7c77fc4deb39aae5ecef832f09c1
  Дополнительные сведения 3:   fb4a
  Дополнительные сведения 4:   fb4ad2ee372e565f0551b35331d91e94

Ознакомьтесь с заявлением о конфиденциальности в Интернете:
  http://go.microsoft.com/fwlink/?linkid=280262

Если заявление о конфиденциальности в Интернете недоступно, ознакомьтесь с его локальным вариантом:
  C:\Windows\system32\ru-RU\erofflps.txt

[gogodanse]

Все заработало спасибо большое <3

[Vint]

.

[gogodanse]

.

А что говорить ? windows server 2012 R2 standart, вылетела ошибка ? жмете "Попытаться исправить" перезапускаете и что-то чинится, это же windows он даже не написал в чом была проблема

[gogodanse]

.

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

не работает

$var = HTTPGET ("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live")
$template = STRCONCAT(CHAR(34), "videoId\", CHAR(34), ":" )
$start = STRPOS($var, $template) + 13
$end = STRPOS($var, "\", $start) - 1
$our_code = STRCUT2($var, $start, $end)
$HTML = HTTPGET ("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live")
if ((strpos($HTML, "Сейчас смотрят") > 0))
WAIT(10)
KEYSTRING($our_code)
END_IF
HALT

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

[Oraven]

HTTPGET не работает с https, только с http

[4.У.В.@.К]

HTTPGET не работает с https, только с http

Hito намутил же dll-ки для https.
http://crapware.aidf.org/forum/index.php?topic=5198.msg33755#msg33755
Спасибо Hito! 

Вот так вроде стабильно работает скрипт и Clickermann не крашится.

Code: (clickermann) [Select]

STRSEPARATE(STRFILTER(HTTPGET ("https://www.youtube.com/channel/UCi_VsjkIy8vPMQnRMhPu9OA/live"), "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890_Сейчассмотрят", 1), "wwwyoutubecomchannel", $arr_1)

IF(STRPOS($arr_1[8], "Сейчассмотрят"))
   STRSEPARATE($arr_1[8], "live", $arr_2)
   $our_code = $arr_2[0]
   LOGWRITE ($our_code) // айди стрима в лог

   // KEYSTRING($our_code) // вписываем айди куда нужно
   // KEYPRESS(#ENTER)
END_IF

HALT
Пробовал делать и другие варианты, но кликер то работает, то вырубается, как то безсистемно. А этот скрипт с массивом, у меня ни разу не заглючил.