Кибор » Кибор - Интегрированная среда разработки ботов » Вопросы и решение проблем » Бот РР3

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

1. Pantuh - 20 Февраля, 2023 - 12:57:16 - перейти к сообщению
Бот слеплен из нескольких скриптов.
Необходимо между функциями Заброс(): и Подсечка();, добавить ещё одну функцию Проводка;.
Суть функции должна заключаться в следующем:
Удержание клавиши "S" при следующих условиях:
1. Если во время удержания клавиши "S" нажатой происходит поклёвка, то скрипт запускает функцию Лов(); это условие выполняется так, как функция Подсечка: реализована через функцию приложения Кибор "findimage".
2. Если во время удержания клавиши "S" нажатой не происходит поклёвки, то скрипт должен вызвать функцию Заброс(); и снова удерживать клавишу "S" нажатой до момента исполнения первого условия.







win w=window (-1, -1, -1, -1, 1026, 735, -1);
if (w==0){messagebox ("Нет окна"); goto er;}
activate(w);
pause(1000);

win w2;

int Блесна[1][49];
if (load_images()==-1){messagebox ("Нет изображения"); goto er;}

enabletimer(0);

A:;
Заброс();

Подсечка();
Лов();
er:;


function Лов()
{
-HIDE0>win w=window (-1, -1, -1, -1, 1026, 735, -1);

activate(w);
pause(1000);
int z=0, x=0, c=0;
loop()
{
if (getcolor(278, 282, w)!=255)
{
if (z==0 && getcolor(420, 562, w)!=0)
{
z=1;
sleep(10);
key('s');
sleep(5);
keydown('s');
}

if (x==0 && getcolor(420, 558, w)!=0)
{
x=1;
sleep(10);
key('d');
sleep(5);
keydown('d');
}
{
if (c==0 && getcolor(510, 562, w)==0)
c=1;
sleep(10);
key('a');
sleep(5);
keydown('a');
}
}

{
if(z==1 && getcolor(450, 562, w)==0)
{
z=0;
keyup('s');
}
if(x==1 && getcolor(450, 558, w)==0)
{
x=0;
keyup('d');
}

}
sleep(50);
}
}/HIDE0>




function Протяжка()
{

}







function Садок()
-HIDE1>{
w2=window (-1, -1, -1, -1, 800, 600, -1);
if (w2!=0)
{
if (getcolor(5, 12, w2)==2050466)
{
sleep(500);
key(32);
pause(1000);
goto global A;
}
}
}/HIDE1>



function Еда()
-HIDE2>{
w2=window (-1, -1, -1, -1, 330, 220, -1);
if (w2!=0)
{
if (getcolor(5, 12, w2)==539037)
{
sleep(500);
mouse(LEFT, 311, 16, 0, w2);
pause(1000);
/////////////
mouse(LEFT, 180, 683, 0, w);
pause(1000);
w2=window (-1, -1, -1, -1, 500, 390, -1);
if (w2!=0)
{
if (getcolor(5, 19, w2)==1918112)
{
sleep(500);
mouse(LEFT, 438, 271, 0, w2);
sleep(500);
mouse(LEFT, 486, 14, 0, w2);
pause(1000);
goto global A;
}
}
////////////
}
}
}/HIDE2>




CREATE_TIMER(0, 1000)//Номер таймера, выполнение таймера через мсек.
-HIDE5>{
Еда();
Садок();

}/HIDE5>




function Подсечка()
-HIDE6>{
int x, y;
while(findimage(1, #Блесна[0][0], -1, #x, #y, 0, 0, w.width, w.height, w)==1)sleep(10);
}
/HIDE6>



function Заброс()
-HIDE3>{
mouse(LEFT, 310, 310, 0, w);
pause(1000);
}/HIDE3>


function load_images()
-HIDE4>{
if (loadimage (#Блесна[0][0], "C:\Users\Инженер\Documents\My Games\Русская рыбалка 3\На блесну.bmp")<1) return -1;

return 1;
}/HIDE4>
2. Pantuh - 05 Марта, 2023 - 09:57:51 - перейти к сообщению
Подскажите как закрыть тему??? Решил вопрос.
3. Ilya001 - 05 Марта, 2023 - 10:59:35 - перейти к сообщению
 Pantuh пишет:
Подскажите как закрыть тему??? Решил вопрос.

А зачем закрывать? Пусть останется)) Админ может...

Powered by ExBB FM 1.0 Final