Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: мои яички съели птички on January 30, 2019, 12:20:08 PM

Title: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 12:20:08 PM
Помогите реализовать.
1. Текст из файла txt 1 строка сравнить с буфером если текст отличается выполнить внешний файл.
2. Если пинг на ya.ru есть продолжить выполнение скрипта.
Title: Re: Помогите реализовать
Post by: Oraven on January 30, 2019, 01:36:46 PM
Что подразумевается под "выполнить внешний файл"

1.
Code: (clickermann) [Select]
IF(FROMCLIP() ! TFREAD("text.txt", 1))
// Выполнить внешний файл
END_IF

На счет второго, кликер не умеет пинговать. Можно конечно послать запрос через  HTTPGET но эта функция работает только по не шифрованному протоколу http, а ya.ru не работает через http

Code: (clickermann) [Select]
$a = HTTPGET("http://ya.ru")
LOGWRITE ($a)
HALT

Title: Re: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 02:18:18 PM
внешний файл это программа .exe
не обязательно пинговать ya.ru задача проверить наличие интернета и если его нет повторить задание.
Title: Re: Помогите реализовать
Post by: Космич on January 30, 2019, 02:22:42 PM
Code: (clickermann) [Select]
EXECUTE("программа.ехе")
Title: Re: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 04:41:25 PM
Code: [Select]
$a = HTTPGET("http://ya.ru")
LOGWRITE ($a)
HALT

Вроде понял при отсутствии пинга ошибка уходит в лог, а вот дальше нужно если есть файл errorlog.txt или в файле есть error выполнять другое действие.
Title: Re: Помогите реализовать
Post by: Космич on January 30, 2019, 04:56:34 PM
Code: (clickermann) [Select]
IF(FROMCLIP() ! TFREAD("text.txt", 1))
   EXECUTE("программа.ехе")
END_IF

IF(HTTPGET("http://crapware.aidf.org/") ! "")
   // Тут действия если интернет есть
END_IF
Title: Re: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 05:11:57 PM
ошибка при интерпретации строки
Code: [Select]
IF(HTTPGET("http://crapware.aidf.org/") ! "")
Title: Re: Помогите реализовать
Post by: Космич on January 30, 2019, 05:13:27 PM
А какая у тебя версия кликера?
Title: Re: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 05:19:30 PM
4.13
Title: Re: Помогите реализовать
Post by: Космич on January 30, 2019, 05:21:30 PM
я не знаю, у меня тоже 4.13 и всё работает, но на свеже-скачанным такая же фигня

P.S.
Попробуй так
Code: (clickermann) [Select]
IF(STRLEN(HTTPGET("http://crapware.aidf.org/")) > 0)

END_IF
Title: Re: Помогите реализовать
Post by: мои яички съели птички on January 30, 2019, 05:33:48 PM
спс работает