PDA

Просмотр полной версии : ICQ-бот Болтун [Delphi]


4ak
13.05.2009, 17:25
http://pic.ipicture.ru/uploads/090513/39491/22CfT6Iy5U.jpg (http://ipicture.ru/)

Имитирует настоящий разговор с собеседником, фразами задаными в файле "text" (либо в самой программе).Отправляет сообщения с задержкой в 2-3 секунды.

P.S. При нажатии на зелёную часть цветочка ICQ происходит подключение, при нажатии на красную часть - Отключение.

http://pic.ipicture.ru/uploads/090507/4ylm9T2z1x.gif (http://dump.ru/file/2590734)

Nikolas2009
13.05.2009, 23:05
Лови +

warkk
14.05.2009, 08:45
Прикольно, лови +

.Varius
16.05.2009, 14:46
Мне понравилось.
Иногда почему то отправляет пустые сообщения.
Было бы неплохо, если бы еще пасс был скрытым...

Zombi ****
16.05.2009, 15:22
прога кул лови +

FALTONICK
16.05.2009, 16:28
пользовался макс-ботом попробуем этот

.Varius
16.05.2009, 21:05
А как там ответы сменить? Нужно в отдельный файл записывать?

4ak
16.05.2009, 21:16
.Varius , можно в самом окне вписать ответы) а можно и в файл

Lilo
16.05.2009, 21:53
готовых много там ответов???

dimhee
16.05.2009, 23:11
забавно будет почитать перепись очередной озабоченной с ботом

FALTONICK
17.05.2009, 08:55
готовых много там ответов???Hу, здоpово! Какие пpоблемки?
Hу, это слегка гpубо, ты не находишь?
Собственно - ничего.
Чудoвищнo пpиятнo...
Hо ведь Копеpник погиб, отстаивая сию аксиому!
Я начинаю сомневаться в твоем интеллекте;)
Я так и doomал.
Дуpак - это твоe имя или фамилия?
угадайку и пpизы за логику и помощь ещё никто не отменял
Я понял, ты не анализиpуешь мои вопpосы, очень повеpхностная беседа.
И что же ты уже понял?
Да, что-то вот этак;)
Мне тоже интеpесно.
вот так
А тебе, похоже, мозгов;)
Да я не неpвничаю, я пива хочу!
Hу и что? Hе спpашивал - и не спpашивай лучше.
;)) Ага, что-то не так вот.. ;)
Пиво - это слабоалкогольный напиток.
Так сходи!
Словаpный запас у тебя маловат, не находишь?
Я бы так не сказал.
Тpетий уже есть. Так что давай.
Пpосто замечательно:)
Hу даю.
Рассказывай.
Фантазии катастpофически не хватает. Это пpоблема.
Все, больше вопpосов нет?
Вот именно.
Умнее своего подсознанья может быть лишь сумасшедший.
А о чем бы тебе хотелось?
Да.
ну ладно, пеpеходим к следующему вопpосу
баpабан.

.Varius
17.05.2009, 20:25
Лучше напишите как изменить))

4ak
19.05.2009, 00:56
ICQ-бот Болтун [Delphi] v.2

http://pic.ipicture.ru/uploads/090518/39491/7b62iS5PI2.jpg
http://pic.ipicture.ru/uploads/090518/39491/Uaq7hJ5TWU.jpg

Новое:
1) Появилась функция анализа присланых сообщений. и ответа на них заданим текстом.

В столбец "Слово" пользователь может записать слова которые бот должен анализировать,
а в столбец "Ответ" - текст который будет ответом на это сообщение.

Т.е., если таблица будет заполнена как показано на рисунке выше, то при получении сообщения "привет" (либо "прив", либо "приветствую" - не важно главное содержит буквы "при"), то ответ бота последует "Привет! Как дела?". Далее можно добавить ещё строк таблицы, по аналогии их заполнив.

2) Функция ручной настройки времени ответа бота. Тоже на вкладке настройки.
Пример:
<Пришло сообшение>
(ожидание в мс)
<ответ бота>

3) Исправлен баг с непоявлением в "Состояние подключения" отчёта о подключении бота.

>>>Cкачать<<< (http://uined.ucoz.net/load/13-1-0-4)

.Varius
19.05.2009, 20:50
1) Появилась функция анализа присланых сообщений. и ответа на них заданим текстом.
Это пожалуй самое важное...
Лови +

4ak
24.05.2009, 12:52
ICQ-бот Болтун v2.1
http://savepic.ru/646083.jpg

Добавлено:
1) Сворачивание приложения в Трей
2) Запоминание значений таблицы при закрытии программы
(теперь не придётся при каждом запуске набивать базу сначала)
3) Для моментальной очистки таблицы появилась кнопка "Очистить"

>>>Cкачать<<< (http://dump.ru/file/2776884)

Bendjamin
25.05.2009, 23:53
Забавная штука :)..но каково ее первоначальное предназначение?:D

Choose
26.05.2009, 00:03
Прикольна, мну понравилос!!!