PCCar.ru - Ваш автомобильный компьютер

PCCar.ru - Ваш автомобильный компьютер (http://pccar.ru/index.php)
-   iCarDS (http://pccar.ru/forumdisplay.php?f=121)
-   -   iCarVoiceCommander - управляем икаром голосом (http://pccar.ru/showthread.php?t=19766)

Bersenev 17.10.2013 18:19

iCarVoiceCommander - управляем икаром голосом
 
Смотрим видео

http://content.video.mail.ru/mail/be...video/i-30.jpg

Видео управления голосом картой навигационной программы встроенной в iCar

http://content.video.mail.ru/mail/be...video/i-37.jpg

Видео управления окнами Windows

http://content.video.mail.ru/mail/be...video/i-39.jpg

Всё это надо установить

1. Установить .NET 4.5..
2. Установить Microsoft Speech Platform - Runtime (Version 11)
для своей платформы
3. Устанавливаем Microsoft Speech Platform - Software Development Kit (SDK) (Version 11)
4. Устанавливаем Microsoft Speech Platform - Runtime Languages (Version 11) Нажимаем Download и выбираем файл MSSpeech_TTS_ru-RU_Elena.msi , потом в Панели управления -- Распознавание речи -- Преобразование текста в речь задаём этот голос по умолчанию
5. Устанавливаем ms_recognition.msi.
6. Устанавливаем RHVoice-v0.2.161-setup.exe
7. Идем в настройки записи звука ОС и делаем используемый микрофон устройством записи по-умолчанию (правой кнопкой).

Если пункт 4 не сработает, то есть комп не заговорит по русски, то вот инструкция.

Цитата:

Инструкция по установке русского голосового движка от Microsoft на Windows 7
1. Скачиваем и устанавливаем версию x86 или x64 Microsoft Speech Platform - Runtime (2.5 Mb)
http://www.microsoft.com/en-us/downl....aspx?id=27225
2. Скачиваем и устанавливаем русский голосовой движок Elena (файл MSSpeech_TTS_ru-RU_Elena.msi - 6 Mb). Можно и английский движок для сравнения скачать.
http://www.microsoft.com/en-us/downl....aspx?id=27224
3. Копируем этот текст в файл и сохраняем его как speech.vbs:
Код:

Dim strText, objVoice, objHTML
Set objVoice = CreateObject("SPEECH.SpVoice")
If WScript.Arguments.Count = 1 Then Set objVoice.voice = objVoice.GetVoices.Item(CInt(WScript.Arguments(0)))
Set objHTML = CreateObject("htmlfile")
strText = objHTML.ParentWindow.ClipboardData.GetData("text")
If strText <> "" Then objVoice.speak strText

4. Копируем любой текст в буфер обмена, потом открываем командную строку (нажав кнопку Пуск и выбрав пункты Все программы, Стандартные и Командная строка), набираем там:
"C:\Путь к файлу\speech.vbs"
или
"C:\Путь к файлу\speech.vbs" 0
или (если вы установили и английский движок тоже)
"C:\Путь к файлу\speech.vbs" 1
и нажимаем Enter
Наслаждаемся разными голосами, включая русский.

Для нормальной работы надо установить все обновления отсюда http://www.pccar.ru/showthread.php?t=20347


"Голос покажись" - выводит окно голосового управления на экран
"Голос спрячься" - сворачивает в трей
"Запусти икар" - запускает икар
"Закрой икар" - закрывает икар

Все остальные команды доступны в икаре. заходим на первый экран настроек скина "Настройка голосовых команд iCarVoiceCommander", для добавления новой команды, произнесите её и если такой команды нет в списке, то она добавится.

Возможные варианты команд описываются в файле ..\Plugins\iCarVoiceCommander\iCarVoiceCommander.x ml

Удачи:bye:

vladj 17.10.2013 18:43

Респект, есть небольшие сомнения в голосовом повторе команд, ибо интерактива не видно, идёт
тупо повторение, которое не очень-то и нужно. Ну если только окружающих удивить ? ИМХО.

Bersenev 17.10.2013 18:59

Цитата:

Сообщение от vladj (Сообщение 274057)
есть небольшие сомнения в голосовом повторе команд, ибо интерактива не видно, идёт
тупо повторение, которое не очень-то и нужно. Ну если только окружающих удивить ? ИМХО.

Повторение нужно только для отладки, что бы слышать, что именно распознала программа. В конечном варианте икар будет отвечать что именно он делает, а если вероятность данной команды не очень высокая, то и просить подтвердить команду.

sirota 17.10.2013 19:12

Отлично :yes2:, то что нужно... все так и представлял как работает.

А как бы потестить ?уже руки чешутся.

Liber 17.10.2013 19:33

крута!!! уже исчесались руки, язык и уши)))

Zhirnov 17.10.2013 19:56

Всё чешется)

Liber 17.10.2013 20:33

Цитата:

Сообщение от Zhirnov (Сообщение 274071)
Всё чешется)

после того, как я рассказал машине что такое возможно, она тоже начала вся чесаться и отказывается ездить :rofl:

sirota 17.10.2013 20:50

Спать не буду пока Bersenev не покажет где качать новую игрушку :lazy:

awtoap 17.10.2013 21:54

ЗЫ: А мыться не пробовали :rofl:

Распознание голоса идет постоянно или по нажатию клавиши? Если постоянно, то как реагирует на музыку... да на любой посторонний шум?

sirota 17.10.2013 22:30

Цитата:

Сообщение от awtoap (Сообщение 274088)
ЗЫ: А мыться не пробовали :rofl:

Если постоянно, то как реагирует на музыку... да на любой посторонний шум?

Если взято за основу с этой темы, то при нормально играющей музыки у меня в 9 случаях из 10 шло распознавание без проблем.


Часовой пояс GMT +4, время: 18:08.

Работает на vBulletin® версия 3.8.4.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot