#name "favicon search in Yandex"
// Author: Vint
// Version: 1.0 (13.08.2014)
$zapros = "лунная афёра"
$page_all = 10 // просматривать страниц
$brawser = "firefox.exe"
//==============================================================================
SUB(close) //===================================================================
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#W)
WAITMS (50)
KEYUP (#W)
KEYUP (#CTRL)
WAITMS(500)
END_SUB
//==============================================================================
LOGCLEAR
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(3)
END_IF
$zapros = STRREPLACE ($zapros, " ", "%20") // лечение пробелов
FOR($page=0, $page<$page_all)
$param = STRCONCAT("yandex.ru/yandsearch?lr=213&text=", $zapros, "&p=", $page)
LOGWRITE ("Страница ", $page)
//LOGWRITE ($param)
EXECUTE($brawser, $param) //открываем страницу
WAITMS(1500)
LCLICK(5,500)
WAITMS(50)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon.bmp") // 16777215
LOGWRITE ("Найдено на странице ", $page)
HINTPOPUP(STRCONCAT("страница ", $page), "Найдено!")
LOGSHOW (1,$_xmax-335,28) // отображение окна лога
WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
HALT
END_IF
// мотаем ниже
$hash1 = PXLCRC (220,180,230,800)
WHEELDOWN(6)
WAITMS(100)
GETSCREEN
$hash2 = PXLCRC (220,180,230,800)
IF($hash1 = $hash2)
close() // закрываем вкладку
$var = 0
END_IF
WAITMS(500)
END_CYC
END_CYC
LOGWRITE ("Ничего не найдено. Пройдено ", $page_all, " страниц")
HINTPOPUP(STRCONCAT("Не найдено на ", $page_all, " стр."), "Не найдено")
LOGSHOW (1,$_xmax-335,28) // отображение окна лога
WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
HALT
LCLICK($_return1+50, $_return2+10)
#name "favicon search in Yandex"
// Author: Vint
// Version: 1.0 (13.08.2014)
$zapros = "тюнинг Мазда6"
$page_all = 10 // просматривать страниц
$brawser = "firefox.exe"
//==============================================================================
SUB(close) //===================================================================
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#W)
WAITMS (50)
KEYUP (#W)
KEYUP (#CTRL)
WAITMS(500)
END_SUB
//==============================================================================
LOGCLEAR
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(3)
END_IF
$zapros = STRREPLACE ($zapros, " ", "%20") // лечение пробелов
FOR($page=0, $page<$page_all)
$param = STRCONCAT("yandex.ru/yandsearch?lr=213&text=", $zapros, "&p=", $page)
LOGWRITE ("Страница ", $page)
//LOGWRITE ($param)
EXECUTE($brawser, $param) //открываем страницу
WAITMS(1500)
LCLICK(5,500)
WAITMS(50)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon.bmp") // 16777215
LOGWRITE ("Найдено на странице ", $page)
HINTPOPUP(STRCONCAT("страница ", $page), "Найдено!")
LOGSHOW (1,$_xmax-335,28) // отображение окна лога
WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
LCLICK($_return1+50, $_return2+10)
EXECUTE("1.cms") //запуск лазилки
WAITMS(1000)
LCLICK(564 , 407)
HALT
END_IF
// мотаем ниже
$hash1 = PXLCRC (220,180,230,800)
WHEELDOWN(6)
WAITMS(100)
GETSCREEN
$hash2 = PXLCRC (220,180,230,800)
IF($hash1 = $hash2)
close() // закрываем вкладку
$var = 0
END_IF
WAITMS(500)
END_CYC
END_CYC
LOGWRITE ("Ничего не найдено. Пройдено ", $page_all, " страниц")
HINTPOPUP(STRCONCAT("Не найдено на ", $page_all, " стр."), "Не найдено")
LOGSHOW (1,$_xmax-335,28) // отображение окна лога
WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
HALT
#name "favicon search in Yandex"
// Author: Vint
// Version: 1.1 (14.08.2014)
$zapros = "лунная афёра"
$page_all = 10 // просматривать страниц
$brawser = "firefox.exe"
//==============================================================================
SUB(close) //===================================================================
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#W)
WAITMS (50)
KEYUP (#W)
KEYUP (#CTRL)
WAITMS(500)
END_SUB
//==============================================================================
SUB(IP) //======================================================================
// здесь скрипт смены IP
END_SUB
//==============================================================================
SUB(actions) //=================================================================
// здесь скрипт действий на найденных страницах
END_SUB
//==============================================================================
SUB(find) //== Поиск в выдаче яндекса ==========================================
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(3)
END_IF
$find = 0
$zapros = STRREPLACE ($zapros, " ", "%20") // лечение пробелов
FOR($page=0, $page<$page_all)
$param = STRCONCAT("yandex.ru/yandsearch?lr=213&text=", $zapros, "&p=", $page)
LOGWRITE ("Страница ", $page)
//LOGWRITE ($param)
EXECUTE($brawser, $param) //открываем страницу
WAITMS(1500)
LCLICK(5,500)
WAITMS(50)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon.bmp") // 16777215
LOGWRITE ("Найдено на странице ", $page)
HINTPOPUP(STRCONCAT("страница ", $page), "Найдено!")
//LOGSHOW (1,$_xmax-335,28) // отображение окна лога
//WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
$run_X = $_return1+50
$run_Y = $_return2+10
$find = 1
$var = 0
$page = $page_all
//HALT
END_IF
IF($var = 1)
// мотаем ниже
$hash1 = PXLCRC (220,180,230,800)
WHEELDOWN(6)
WAITMS(100)
GETSCREEN
$hash2 = PXLCRC (220,180,230,800)
IF($hash1 = $hash2)
close() // закрываем вкладку
$var = 0
END_IF
WAITMS(500)
END_IF
END_CYC
END_CYC
END_SUB
//==============================================================================
// --- START ---
LOGCLEAR
WHILE(1) // основной цикл скрипта
IP() // меняем IP
find() // ищем сайт
IF($find = 1) // нашли
LCLICK($run_X, $run_Y) // открываем сайт
WAITMS(2000)
actions() // обрабатываем
ELSE //не нашли
LOGWRITE ("Ничего не найдено. Пройдено ", $page_all, " страниц")
HINTPOPUP(STRCONCAT("Не найдено на ", $page_all, " стр."), "Не найдено")
HALT
END_IF
END_CYC
HALT
а можно узнать какой это язык программирование чтобы книшку почитать ?Местный, авторский Johnny (http://crapware.aidf.org/forum/index.php?action=profile;u=1).
#include
Вставляет в это место содержимое текстового файла из папки проекта. Это позволяет "прятать" объемный код, повышая таким образом читаемость скрипта.
Пример: #include "mylib.cms"
#include "1_script.cms" // Вызываем первый скрипт
#include "2_script.cms" // После того, как отработает первый скрипт, вызывается второй и т.д.
#include "3_script.cms" // и т.д.
HALT
А в инклюдах сабы починили?Если честно, про это я не в курсе. :-[ Инклюды не использую, нет надобности пока просто, да и проблема с одновременным открытием двух редакторов присутствует. Удобно сделано конечно, что можно открыть и основной скрипт и инклюд одновременно и редактировать их. Но потом, чтобы запустить любой из них требуется сначала закрыть оба, иначе не запустится.
А в инклюдах сабы починили? А то у меня в голове отложилось, что не работает и не стал предлагать.я пользуюсь без проблем
Можно просто начинать интернет-серфинг с бесплатных сервисов-анонимайзеров, например:
Хамелеон - Анонимайзер (http://cameleo.ru/) или ДайДоступ (http://daidostup.ru/).
Они предоставляют свою строку ввода веб-адреса, в которую Clickermann может вписывать нужный вам адрес.
Анонимайзер сам подберет оптимальный прокси.
Это только как вариант.
user_pref("network.proxy.type", 0); // 1 - включен прокси; 0 - выключен (эта строка в файле есть всегда)
user_pref("network.proxy.share_proxy_settings", true); // Флаг использования этого прокси-сервера для всех протоколов (строка есть только когда опция включена)
user_pref("network.proxy.ftp", "192.168.0.12");
user_pref("network.proxy.ftp_port", 3122);
user_pref("network.proxy.http", "192.168.0.12");
user_pref("network.proxy.http_port", 3122);
user_pref("network.proxy.socks", "192.168.0.12");
user_pref("network.proxy.socks_port", 3122);
user_pref("network.proxy.ssl", "192.168.0.12");
user_pref("network.proxy.ssl_port", 3122); // Все эти строки появляются в файле настроек, только тогда, когда прописан прокси
Тогда можно редактировать файл настроек Firefox "prefs.js".
Который лежит в папке профиля C:\Users\Имя_Пользователя\AppData\Roaming\Mozilla\Firefox\Profiles\блаблабла\
Там есть такие строки (добавил комментарии):Code: (javascript) [Select]user_pref("network.proxy.type", 0); // 1 - включен прокси; 0 - выключен (эта строка в файле есть всегда)
user_pref("network.proxy.share_proxy_settings", true); // Флаг использования этого прокси-сервера для всех протоколов (строка есть только когда опция включена)Code: (javascript) [Select]user_pref("network.proxy.ftp", "192.168.0.12");
user_pref("network.proxy.ftp_port", 3122);
user_pref("network.proxy.http", "192.168.0.12");
user_pref("network.proxy.http_port", 3122);
user_pref("network.proxy.socks", "192.168.0.12");
user_pref("network.proxy.socks_port", 3122);
user_pref("network.proxy.ssl", "192.168.0.12");
user_pref("network.proxy.ssl_port", 3122); // Все эти строки появляются в файле настроек, только тогда, когда прописан прокси
В данном примере Firefox настроен на соединение через прокси 192.168.0.12, порт 3122.
Firefox придется перезапускать, каждый раз после редактировании файла.
Можно попробовать сделать по другому.
Если в Firefox в настройках соединения установить - "Использовать системные настройки прокси", а в Internet Explorer эти самые настройки прописать и применить, то Firefox применяет их без перезагрузки. Можно попробовать сделать это с помощью *.reg или *.bat-файлов.
Пробовать надо...
#name "favicon search in Yandex" // Author: Vint // Version: 1.1 (14.08.2014) |
$zapros = "лунная афёра"
$page_all = 10 // просматривать страниц
$brawser = "firefox.exe"
//==============================================================================
SUB(close) //===================================================================
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#W)
WAITMS (50)
KEYUP (#W)
KEYUP (#CTRL)
WAITMS(500)
END_SUB
//==============================================================================
SUB(IP) //======================================================================
// здесь скрипт смены IP
END_SUB
//==============================================================================
SUB(actions) //=================================================================
// здесь скрипт действий на найденных страницах
END_SUB
//==============================================================================
SUB(find) //== Поиск в выдаче яндекса ==========================================
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(3)
END_IF
$find = 0
$zapros = STRREPLACE ($zapros, " ", "%20") // лечение пробелов
FOR($page=0, $page<$page_all)
$param = STRCONCAT("yandex.ru/yandsearch?lr=213&text=", $zapros, "&p=", $page)
LOGWRITE ("Страница ", $page)
//LOGWRITE ($param)
EXECUTE($brawser, $param) //открываем страницу
WAITMS(1500)
LCLICK(5,500)
WAITMS(50)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon.bmp") // 16777215
LOGWRITE ("Найдено на странице ", $page)
HINTPOPUP(STRCONCAT("страница ", $page), "Найдено!")
//LOGSHOW (1,$_xmax-335,28) // отображение окна лога
//WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
$run_X = $_return1+50
$run_Y = $_return2+10
$find = 1
$var = 0
$page = $page_all
//HALT
END_IF
IF($var = 1)
// мотаем ниже
$hash1 = PXLCRC (220,180,230,800)
WHEELDOWN(6)
WAITMS(100)
GETSCREEN
$hash2 = PXLCRC (220,180,230,800)
IF($hash1 = $hash2)
close() // закрываем вкладку
$var = 0
END_IF
WAITMS(500)
END_IF
END_CYC
END_CYC
END_SUB
//==============================================================================
// --- START ---
LOGCLEAR
WHILE(1) // основной цикл скрипта
IP() // меняем IP
find() // ищем сайт
IF($find = 1) // нашли
LCLICK($run_X, $run_Y) // открываем сайт
WAITMS(2000)
actions() // обрабатываем
ELSE //не нашли
LOGWRITE ("Ничего не найдено. Пройдено ", $page_all, " страниц")
HINTPOPUP(STRCONCAT("Не найдено на ", $page_all, " стр."), "Не найдено")
HALT
END_IF
END_CYC
HALT
[/td]
[/tr]
[/table]
#name "favicon search in Yandex"
// Author: Vint
// Version: 1.1 (14.08.2014)
$zapros = "Тюнинг Мазда6"
$page_all = 10 // просматривать страниц
$brawser = "firefox.exe"
//==============================================================================
SUB(close) //===================================================================
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#W)
WAITMS (50)
KEYUP (#W)
KEYUP (#CTRL)
WAITMS(500)
END_SUB
//==============================================================================
SUB(IP) //======================================================================
// здесь скрипт смены IP
LCLICK(1275,10)
WAIT(3)
LCLICK(1313,154)
LCLICK(1313,154)
WAIT(2)
lDown(220,56)
move(12,54)
lUp(12,54)
keyDown(17)
keyDown(162)
keyDown(67)
keyUp(67)
keyUp(17)
keyUp(162)
keyDown(8)
keyUp(8)
move(12,56)
move(12,58)
move(12,60)
move(12,62)
move(12,64)
move(12,66)
move(12,68)
move(12,70)
lDown(12,70)
lUp(12,70)
keyDown(8)
keyUp(8)
LCLICK(805,10)
LCLICK(595,392)
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(10)
LCLICK(1309,48)
LCLICK(1335,191)
lDown(797,282)
lUp(797,282)
lDown(797,282)
move(527,284)
lUp(527,284)
keyDown(17)
keyDown(162)
keyDown(86)
keyUp(86)
keyUp(162)
keyUp(17)
WAIT(1)
LCLICK(625,510)
WAIT(4)
LCLICK(1309,48)
WAIT(1)
LCLICK(1211,90)
WAIT(2)
LCLICK(715,90)
END_IF
END_SUB
//==============================================================================
SUB(actions) //=================================================================
// здесь скрипт действий на найденных страницах
END_SUB
//==============================================================================
SUB(find) //== Поиск в выдаче яндекса ==========================================
$find = 0
$zapros = STRREPLACE ($zapros, " ", "%20") // лечение пробелов
FOR($page=0, $page<$page_all)
$param = STRCONCAT("yandex.ru/yandsearch?lr=213&text=", $zapros, "&p=", $page)
LOGWRITE ("Страница ", $page)
//LOGWRITE ($param)
EXECUTE($brawser, $param) //открываем страницу
WAITMS(2500)
LCLICK(5,500)
WAITMS(150)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon.bmp") // 16777215
LOGWRITE ("Найдено на странице ", $page)
HINTPOPUP(STRCONCAT("страница ", $page), "Найдено!")
//LOGSHOW (1,$_xmax-335,28) // отображение окна лога
//WNDSIZE(WNDFIND("Clickermann - Лог"),336,260) // изменения размеров окна лога
$run_X = $_return1+50
$run_Y = $_return2+10
$find = 1
$var = 0
$page = $page_all
//HALT
END_IF
IF($var = 1)
// мотаем ниже
$hash1 = PXLCRC (220,180,230,800)
WHEELDOWN(6)
WAITMS(2500)
GETSCREEN
$hash2 = PXLCRC (220,180,230,800)
IF($hash1 = $hash2)
close() // закрываем вкладку
$var = 0
END_IF
WAITMS(1500)
END_IF
END_CYC
END_CYC
END_SUB
//==============================================================================
// --- START ---
LOGCLEAR
WHILE(1) // основной цикл скрипта
IP() // меняем IP
find() // ищем сайт
IF($find = 1) // нашли
LCLICK($run_X, $run_Y) // открываем сайт
WAITMS(2000)
actions() // обрабатываем
ELSE //не нашли
LOGWRITE ("Ничего не найдено. Пройдено ", $page_all, " страниц")
HINTPOPUP(STRCONCAT("Не найдено на ", $page_all, " стр."), "Не найдено")
HALT
END_IF
END_CYC
HALT
как все лежит у меня Глянул яндекс диск, где "favicon.bmp"?он там есть просто он открытым состояние показывает там буква а
Для проектов есть папка projects, зачем мусорить скриптами где попало?
все работает кроме нахождения сайта по картинки( как исправить? а можно сделать чтобы сайт искал не по картинке а по сыке...Так разберись с поиском, на примере простого скрипта. Если не находит одну картинку ты думаешь будет находить другую, более сложную в поиске?
LOGCLEAR
GETSCREEN
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "favicon.bmp")
LOGWRITE ("Найдено")
MOVE($_return1,$_return2)
ELSE
LOGWRITE ("Не найдено")
END_IF
HALT
все работает кроме нахождения сайта по картинки( как исправить? а можно сделать чтобы сайт искал не по картинке а по сыке...Так разберись с поиском, на примере простого скрипта. Если не находит одну картинку ты думаешь будет находить другую, более сложную в поиске?
И зачем каждый раз новая тема?
Создай рядом новый скрипт для тестаCode: (clickermann) [Select]LOGCLEAR
GETSCREEN
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "favicon.bmp")
LOGWRITE ("Найдено")
MOVE($_return1,$_return2)
ELSE
LOGWRITE ("Не найдено")
END_IF
HALT
Открой браузер на странице с нужной иконкой в выдаче поиска. Открой лог кликера. Запускай скрипт. Что в логе?
У меня всё находит (на XP).
есть такой вопрос если айпи не рабочай то можно все заново цикл вернулся и поменял айпи адрес?Как я долго ждал этого вопроса.
есть такой вопрос если айпи не рабочай то можно все заново цикл вернулся и поменял айпи адрес?Как я долго ждал этого вопроса.
Конечно, нужно проверять и если странице не загрузилась идти на следующий цикл.
Спасибо Vint) огромное спасибо) как сайт раскручу буду должен))