Автокликер Clickermann :: Форум
Основной раздел => Общие вопросы => Topic started by: Enot on September 02, 2014, 04:58:18 PM
-
#include "1.cms"
#include "2.cms"
#include "3.cms"
#include "4.cms"
#include "5.cms"
#include "6.cms"
#include "7.cms"
#include "8.cms"
#include "9.cms"
#include "10.cms"
#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(1273,7)
WAITMS(50)
LCLICK(1273,7)
WAITMS(50)
LCLICK(1273,7)
$hwnd = WNDFIND("proxylist.txt")
IF($hwnd > 0)
EXECUTE("proxylist.txt") //запуск прокси листа
WAIT(1)
LCLICK(594,241)
lDown(640,242)
move(225,213)
lUp(225,213)
keyDown(17)
keyDown(162)
keyDown(67)
keyUp(67)
keyUp(17)
keyUp(162)
keyDown(46)
keyUp(46)
keyDown(46)
keyUp(46)
WAITMS(50)
LCLICK(1223,195)
WAITMS(150)
LCLICK(611,387)
$hwnd = WNDFIND("Mozilla Firefox")
IF($hwnd > 0)
EXECUTE("firefox.exe", "yandex.ru") //запуск Мозилы
WAIT(15)
LCLICK(1310,49) //добовление айпи адреса
WAITMS(50)
LCLICK(1313,190)
WAITMS(150)
LCLICK(817,279)
lDown(821,280)
move(532,286)
lUp(532,286)
keyDown(162)
keyDown(17)
keyDown(86)
keyUp(86)
keyUp(162)
keyUp(17)
LCLICK(628,505)
WAIT(5)
LCLICK(1310,49)
LCLICK(1313,85)
LCLICK(775,85)
END_IF
END_IF
END_SUB
//==============================================================================
SUB(actions) //=================================================================
// здесь скрипт действий на найденных страницах
WAIT(1)
LCLICK(896,52) // 16775402
WAIT(2)
LCLICK(1314,148)
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(1500)
LCLICK(5,500)
WAITMS(50)
$var = 1
WHILE($var = 1)
//LOGWRITE ("ищем...")
GETSCREEN
IF_PICTURE_IN (100,0,$_xmax-35,$_ymax, "favicon2.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(500)
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
еще есть 1 вопрос как сделать так чтобы цифры в поисковом запросе он водил раздельно(
$zapros = "Тюнинг мазда6") если не напишешь слитно то комп не понятно где лазиет
-
Убрать halt в конце первого
-
Убрать halt в конце первого
не помомогло первый скрипт перезапускаеться и начинает все сночаала(
-
Исправил ошибку там у тебя двух END_IF недоставало.
$zapros = "Тюнинг мазда 6"
-
Исправил ошибку там у тебя двух END_IF недоставало.
спасибо большое
а как сделать чтобы в посковой фразе можно было цифры стовлять? оту надо цифры месте писать
-
Исправил ошибку там у тебя двух END_IF недоставало.
$zapros = "Тюнинг мазда 6"
я поставил код который ты исправил теперь он не меняет айпи адрес и опять не переходит на следующий скрипт
-
Комментарии читай. Строка 101: лечение пробела (в запросе). Лечит один (первый) пробел. Если у тебя два продублируй эту, 101-ю строку.
-
Комментарии читай. Строка 101: лечение пробела (в запросе). Лечит один (первый) пробел. Если у тебя два продублируй эту, 101-ю строку.
спасибо большое
а как сделать чтобы на друго скрипт переходил сделать? не крутил одну и тоже
-
а как сделать чтобы на друго скрипт переходил сделать? не крутил одну и тоже
На каком этапе работы переходил? И при каком условии?
А что в инклюдах 1-10?
-
в индюках один и тот же скрипт тока 1 в первом индюке происходит смена айпи адреса и поиск сайта по одному поисковому фразе
а 2 и 3 разные поисковые запросы но без смены айпи адреса
хочу как первый скрипт закончил свои дело (а не пофторял свой скрипт несколько раз) переходил на следующий и так далее
как сделать чтобы первый скрипт не повторялся снова и снова?
-
индюках
;D ;D ;D
-
Ну самый доступный тебе вариант.
В папке кликера есть папка "projects", Удали там лишние скрипты (если не ты их писал) чтоб немешались. И скопируй свой бот вместе с картинкой и всеми скриптами туда.
В конце скирпта вот это
// --- 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
Надо изменить на это
// --- START ---
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
LOAD ("1.cms") // загружаем следующий скрпт
В конце каждого скрипта командой LOAD указываешь какой скрипт загружать следующим. Ну а если надо остановиться то пиши просто HALT
Но вообще по умному все это пишут в одном скрипте.
-
я тоже не понимаю зачем тут да скрипта, нет второго скрипта - нет проблем