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

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

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

> Описание: Нужна помощь в рандомных ответах
abdrazakowa
Отправлено: 26 Января, 2014 - 16:02:28
Post Id



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


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




Нужна помощь в написании бота, который рандомно, в течение 10 секунд, введет в строку рандомную цифру от 1 до 6 и нажмет энтер.
Я нашел только
sleep(rand(10,10000));
а вот как вводить какой-либо текст еще ни в одной теме не встречал. Можете тут объяснить и показать?
 
 Top
Andrew
Отправлено: 26 Января, 2014 - 18:57:06
Post Id



Пользователь
Участник


Покинул форум
Сообщений всего: 118
Дата рег-ции: Июнь 2013  
Откуда: Россия
Репутация: 9




abdrazakowa , Вот в учебнике все есть, ТЫК
 
 Top
abdrazakowa
Отправлено: 27 Января, 2014 - 11:41:17
Post Id



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


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




Не работает выбор рандомного текста, вот код. Часть кода взята из этой темы
CODE:

win w=window ("Warspear Online", "Warspear", -1);
int Image_0[50][50];
loadimage (#Image_0[0][0], "C:\Warspear\Image_1.bmp");
int Time[1], Text[1], PosX_0[1], PosY_0[1];
n: if (findimage(1, #Image_0[0][0], 255, #PosX_0[0], #PosY_0[0], 0, 0, 780, 520, w)==1)
{
mouse (LEFT, PosX_0[0]-35, PosY_0[0]+5, 1, w);
sleep(300);
sleep(rand(2000,10000));
Text=rand(1,6);

if (Text==1)
{
key("Выбрано 1", 0, 1, w);
}
if (Text==2)
{
key("Выбрано 2", 0, 1, w);
}
if (Text==3)
{
key("Выбрано 3", 0, 1, w);
}
else
{
key("None", 0, 1, w);
}
key(RETURN);
}
goto n;
 
 Top
Kibor
Отправлено: 27 Января, 2014 - 11:58:21
Post Id



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


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




 abdrazakowa пишет:
int Time[1], Text[1], PosX_0[1], PosY_0[1];


CODE:
int Time[1], Text, PosX_0[1], PosY_0[1];


 abdrazakowa пишет:
sleep(rand(2000,10000));
CODE:
pause(rand(2000,10000));

(Добавление)
 abdrazakowa пишет:
if (Text==1)
{
key("Выбрано 1", 0, 1, w);
goto t;
}
if (Text==2)
{
key("Выбрано 2", 0, 1, w);
goto t;
}
if (Text==3)
{
key("Выбрано 3", 0, 1, w);
goto t;
}
key("None", 0, 1, w);
t:;
key(RETURN);
 
 Top
abdrazakowa
Отправлено: 27 Января, 2014 - 15:14:15
Post Id



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


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




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


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




Powered by