Кибор » Кибор - Интегрированная среда разработки ботов » Готовые скрипты » Попинайте на качество, но вроде рабочий вариант

Страниц (1): [1]
 

1. baracuda - 26 Июля, 2013 - 11:22:51 - перейти к сообщению
Было бы интересно увидеть другие решения(очень удобно тренироваться на таких проектах, для обучения)

не смог вставить, ограничение на 1 кб текста Недовольство, огорчение
CODE:
start ("C:\Program Files\Google\Chrome\Application\chrome.exe");
win w=window ("Новая вкладка - Google Chrome", "Chrome_WidgetWin_1", -1);
sleep(3000);
activate(w);
key("turboliker.ru", 1, 1, w);
key(RETURN);

int Image_0[82][10];loadimage (#Image_0[0][0], "C:\turboliker\Image_0.bmp");
int PosX_0[512];int PosY_0[512];
int Image_1[17][17];loadimage (#Image_1[0][0], "C:\turboliker\perezag.bmp");
int PosX_1[512];int PosY_1[512];
int Image_2[12][12];loadimage (#Image_2[0][0], "C:\turboliker\reset.bmp");
int PosX_2[512];int PosY_2[512];
int Image_3[66][11];loadimage (#Image_3[0][0], "C:\turboliker\my_group.bmp");
int PosX_3[512];int PosY_3[512];
int Image_4[72][11];loadimage (#Image_4[0][0], "C:\turboliker\podpis.bmp");
int PosX_4[512];int PosY_4[512];
sleep(2000);
//a: if (findimage(1, #Image_1[0][0], 0, #PosX_1[0], #PosY_1[0], 0, 0, w.widthclient, w.heightclient, -1)==0){sleep(100);goto a;}
findimage(1, #Image_3[0][0], 0, #PosX_3[0], #PosY_3[0], 0, 0, w.widthclient, w.heightclient, -1);
mouse(LEFT, PosX_3[0], PosY_3[0]);
sleep(1000);

//a: if (findimage(1, #Image_1[0][0], 0, #PosX_1[0], #PosY_1[0], 0, 0, w.widthclient, w.heightclient, -1)==0){sleep(100);goto a;}
findimage(1, #Image_3[0][0], 0, #PosX_3[0], #PosY_3[0], 0, 0, w.widthclient, w.heightclient, -1);
mouse(LEFT, PosX_3[0], PosY_3[0]);
sleep(1000);
findimage(1, #Image_4[0][0], 0, #PosX_4[0], #PosY_4[0], 0, 0, w.widthclient, w.heightclient, -1);
mouse(LEFT, PosX_4[0], PosY_4[0]);
sleep(1000);
e: if (findimage(1, #Image_1[0][0], 0, #PosX_1[0], #PosY_1[0], 0, 0, w.widthclient, w.heightclient, -1)==0){sleep(100);goto e;}
n: if (findimage(-1, #Image_0[0][0], 0, #PosX_0[0], #PosY_0[0], 0, 0, w.widthclient, w.heightclient, -1)!=0);
{
mouse (LEFT, PosX_0[0], PosY_0[0]);
sleep(10000);
goto n;
}

else
{
if (findimage(5, #Image_2[0][0], 0, #PosX_2[0], #PosY_2[0], 0, 0, w.widthclient, w.heightclient, -1)!=0);
{
mouse (LEFT, PosX_2[1], PosY_2[1]);
key(HOME);
}
else
{
key(NEXT);
sleep(1000);
}
goto e;
2. Kibor - 26 Июля, 2013 - 11:41:29 - перейти к сообщению
 baracuda пишет:
int Image_0[82][10];loadimage (#Image_0[0][0], "C:\turboliker\Image_0.bmp"Подмигивание;
int PosX_0[512];int PosY_0[512];
int Image_1[17][17];loadimage (#Image_1[0][0], "C:\turboliker\perezag.bmp"Подмигивание;
int PosX_1[512];int PosY_1[512];
int Image_2[12][12];loadimage (#Image_2[0][0], "C:\turboliker\reset.bmp"Подмигивание;
int PosX_2[512];int PosY_2[512];
int Image_3[66][11];loadimage (#Image_3[0][0], "C:\turboliker\my_group.bmp"Подмигивание;
int PosX_3[512];int PosY_3[512];
int Image_4[72][11];loadimage (#Image_4[0][0], "C:\turboliker\podpis.bmp"Подмигивание;


А где рисунки? Улыбка
3. baracuda - 26 Июля, 2013 - 11:57:19 - перейти к сообщению
 Kibor пишет:
 baracuda пишет:
int Image_0[82][10];loadimage (#Image_0[0][0], "C:\turboliker\Image_0.bmp"Подмигивание;
int PosX_0[512];int PosY_0[512];
int Image_1[17][17];loadimage (#Image_1[0][0], "C:\turboliker\perezag.bmp"Подмигивание;
int PosX_1[512];int PosY_1[512];
int Image_2[12][12];loadimage (#Image_2[0][0], "C:\turboliker\reset.bmp"Подмигивание;
int PosX_2[512];int PosY_2[512];
int Image_3[66][11];loadimage (#Image_3[0][0], "C:\turboliker\my_group.bmp"Подмигивание;
int PosX_3[512];int PosY_3[512];
int Image_4[72][11];loadimage (#Image_4[0][0], "C:\turboliker\podpis.bmp"Подмигивание;


А где рисунки? Улыбка

сделаемс Улыбка
(Добавление)
 baracuda пишет:
 Kibor пишет:
 baracuda пишет:
int Image_0[82][10];loadimage (#Image_0[0][0], "C:\turboliker\Image_0.bmp"Подмигивание;
int PosX_0[512];int PosY_0[512];
int Image_1[17][17];loadimage (#Image_1[0][0], "C:\turboliker\perezag.bmp"Подмигивание;
int PosX_1[512];int PosY_1[512];
int Image_2[12][12];loadimage (#Image_2[0][0], "C:\turboliker\reset.bmp"Подмигивание;
int PosX_2[512];int PosY_2[512];
int Image_3[66][11];loadimage (#Image_3[0][0], "C:\turboliker\my_group.bmp"Подмигивание;
int PosX_3[512];int PosY_3[512];
int Image_4[72][11];loadimage (#Image_4[0][0], "C:\turboliker\podpis.bmp"Подмигивание;


А где рисунки? Улыбка

сделаемс Улыбка

полный комплект пароль:kibor-bot.com
4. baracuda - 27 Июля, 2013 - 00:16:23 - перейти к сообщению
Попробовал во всех браузерах, кроме хрома негде не работает.


start ("C:\Program Files\Google\Chrome\Application\chrome.exe"Подмигивание;
win w=window ("Новая вкладка - Google Chrome", "Chrome_WidgetWin_1", -1);
start ("C:\Program Files\Internet Explorer\IEXPLORE.EXE"Подмигивание;
win w=window ("Пустая страница - Windows Internet Explorer", "IEFrame", -1)
start ("C:\Program Files\Opera\opera.exe"Подмигивание;
win w=window ("Экспресс-панель - Opera", "OperaWindowClass", -1)
start ("C:\Program Files\Mozilla Firefox\firefox.exe"Подмигивание;
win w=window ("Начальная страница Mozilla Firefox - Mozilla Firefox", "MozillaWindowClass", -1)
start ("C:\Program Files\Safari\Safari.exe"Подмигивание;
win w=window ("Без названия", "{1C03B488-D53B-4a81-97F8-754559640193}", -1)

Powered by ExBB FM 1.0 Final