Автоматизация и боты

 Помощь      Поиск      Пользователи
Сайт Кибор     Программируемый кликер Кибор     Видео обучение     Заказать бот

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

> Без описания
Bubblegum
Отправлено: 03 Ноября, 2014 - 10:55:48
Post Id



Пользователь
Прохожий


Покинул форум
Сообщений всего: 17
Дата рег-ции: Окт. 2014  
Репутация: 0




Игра Lineage2.
Периодически, вылетает маленькое диалговое окно Кибора с ошибкой:

Ошибка в:
goto}__2

и возвращает в среду разработки:

Код бота ниже, сделан на основе имеющихся на форуме в свободном доступе, поэтому там ничего инновационного нет:

CODE:

int mob[3];
mob[0]=117; mob[1]=118; mob[2]=119;

//int baf_time[1];
//baf_time[0]=90000;

//int baf_t[1];
//baf_t[0];

int col_pix, X_pix, Y_pix;
int col_pix1, X_pix1, Y_pix1;
int col_pix2, X_pix2, Y_pix2;
int col_pix3, X_pix3, Y_pix3;

int N=0;
int k_mob=0;
int k_error_tim;
int col, xek, yek;
int error_tim=25000;


nastroit();

////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////Основной цикл///////////////////////////////////////
cikl:;

keydown(116);
pause(rand(100, 200));
keyup(116);
pause(rand(500, 550));


if (getcolor(X_pix, Y_pix)!=col_pix)
{
cikl1: keydown(mob[k_mob]);pause(rand(100, 200));keyup(mob[k_mob]);
k_mob++;
if (k_mob==2)k_mob=0;
pause(rand(1000, 1100));
}



if (getcolor(X_pix, Y_pix)==col_pix)
{
bit1: k_error_tim=gettime();
bit: if (getcolor(X_pix, Y_pix)==col_pix)
{

if(gettime()-k_error_tim>error_tim)
{
if (getcolor(X_pix1, Y_pix1)==col_pix1)
{
keydown(27);pause(rand(100, 200));keyup(27);
goto cikl1;
}
}




keydown(113);pause(rand(100, 200));keyup(113);
keydown(112);pause(rand(100, 200));keyup(112);
goto bit;
}

N++;
textout(0, X_pix, Y_pix+20, "Мобов слито:"+format (N), 0);
podbor();

goto cikl;
/////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////Подбор///////////////////////////////////////////

function podbor()
{
keydown(115);pause(rand(450, 500));keyup(115);keydown(115);pause(rand(450, 500));keyup(115);
keydown(115);pause(rand(450, 500));keyup(115);keydown(115);pause(rand(450, 500));keyup(115);
keydown(115);pause(rand(450, 500));keyup(115);keydown(F4);pause(rand(450, 500));keyup(115);
keydown(115);pause(rand(450, 500));keyup(115);keydown(F4);pause(rand(450, 500));keyup(115);
keydown(115);pause(rand(450, 500));keyup(115);keydown(27);pause(rand(100, 200));keyup(27);
}


//////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////Настройка//////////////////////////////////////////
function nastroit()
{
getdisplay(col, xek, yek);
xek=xek/2-200; yek=yek/2;

textbkcolor (0,255);
textout(0, xek, yek, "Первый пиксель ХП:", 0);
e: if (getkeystate(192)==0) {sleep(50); goto e;}
getmouse(X_pix, Y_pix);
q: if (getcolor(X_pix, Y_pix)==getcolor(X_pix-1, Y_pix)) {X_pix--; goto q;}
col_pix=getcolor(X_pix, Y_pix);
pause(500);

textbkcolor (0,65280);
textout(0, xek, yek, "Последний пиксель ХП:", 0);
e1: if (getkeystate(192)==0) {sleep(50); goto e1;}
getmouse(X_pix1, Y_pix1);
q1: if (getcolor(X_pix1, Y_pix1)==getcolor(X_pix1+1, Y_pix1)) {X_pix1++; goto q1;}
col_pix1=getcolor(X_pix1, Y_pix1);

pause (500);


textbkcolor (0,65280);
textout(0, xek, yek, "Старт?", 0);
e7: if (getkeystate(192)==0) {sleep(50); goto e7;}
pause (5000);

textout(0, xek, yek, "", 2);
resettextout(1);
textbkcolor (0,65280);
}



Комменты к коду были, но они переносятся сюда с искаженной кририллицей и нечитаемы, к сожалению, поэтому удалил. Однако ничего заумного здесь нет, все на основе свободно доступных скриптов с форума.

Если есть идеи что может быть не так, поршу подсказать.
Спасибо.
 
 Top
Kibor
Отправлено: 03 Ноября, 2014 - 11:18:34
Post Id



Администратор
Эксперт


Просматривает форум
Сообщений всего: 8217
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 357





Тут подробно как пользоваться нумерацией скобок.
 
 Top
Bubblegum
Отправлено: 03 Ноября, 2014 - 11:40:59
Post Id



Пользователь
Прохожий


Покинул форум
Сообщений всего: 17
Дата рег-ции: Окт. 2014  
Репутация: 0




 Kibor пишет:

Тут подробно как пользоваться нумерацией скобок.


Спасибо большое! Программист из меня не очень...
 
 Top
Страниц (1): [1]
Сейчас эту тему просматривают: 1 (гостей: 1, зарегистрированных: 0)
« Вопросы и решение проблем »


Все гости форума могут просматривать этот раздел.
Только зарегистрированные пользователи могут создавать новые темы в этом разделе.
Только зарегистрированные пользователи могут отвечать на сообщения в этом разделе.
 




Powered by