|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Виртуальный собеседник
Здравствуйте!
Нужен примерный алгоритм простенького виртуального собеседника. Хотелось бы понять как сделать чтобы программа хоть как-то отвечала на вопросы. |
#2
|
|||
|
|||
Алгоритма не знаю (это искусственный интеллект), а интерфейс (внешний вид) - это MS Agent. Во-первых, анимация, во-вторых - голосовое общение. Есть опции случайного выбора фразы (напр., "Привет", "Здравствуйте", "Салют"). Для распознавания желательно из всего словаря выбрать 10 - 20 команд и, естественно, запрограммировать реакцию на них (конечно, движение и разговор можно привязать и к другим событиям).
|
#3
|
||||
|
||||
Цитата:
Возможно там найдете примерный алгоритм работы подобных программ... |
#4
|
||||
|
||||
Первое что приходит в голову это поиск слов во фразе человека и выбор ответа из заранее подобранных для найденного слова. Ну типа там, человек: "Хай, чо как дела?", бот видит что есть знак вопроса и 2 слова "как" и "дела", и выбирает из своей базы ответ: "Сё тип-топ, сам как?". Ещё в одном вирт.болтуну видел функцию запоминания что говорил человек после задания вопроса ботом и занесением его в базу.
TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |
#5
|
||||
|
||||
//
Ага, не всегда прниятно что "собеседник" "забывает" о чём идёт разговор
Не судите строго, пожалуйста |
#6
|
|||
|
|||
Ну, мой предыдущий проект был "собеседником". Основан на генераторе произвольного текста, по этому и алгоритм у него "произвольный". В конце марта я его переделал в ICQ-чатбота, но из-за слишком примитивного алгоритма и критики что "не умеешь делать чатботов - не*** выставлять на показ" я проект забросил. Теперь только архивная копия исходника осталась... Все равно я не умею делать ИИ...
|
#7
|
||||
|
||||
Сдесь не живут ламеры
Ты чего? ПрограмМеры на ошЫбках учаться
Не судите строго, пожалуйста |
#8
|
||||
|
||||
Ненадо обращать внимание на вопли "не умеешь делать чатботов - не***" это вопят те кто ничего сам сделать неможет. Тот кто может помогает советом. А если выложишь код, то можно что-то попробовать посоветовать.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#9
|
||||
|
||||
Цитата:
Тьюринг надеется на нас TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |
#10
|
||||
|
||||
Согласен, разработайте код в который можно добавлять некий скрипт допустим такой:
<Вхождение "солнышко","светит","греет","появилось"> <Вариант "Погодка сегодня - отлет"> <Вариант "Мда, весна похоже пришла"> </Вхождение> Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#11
|
||||
|
||||
Цитата:
TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |