forum.clarionlife.net

Привет, всем профи Clariona!
Наклюнулась идея озвучивания текста в RTF либо TxText контроле.
Искал на форуме, но запрос на фразу "озвучивание" ничего не показал. Говорилок имеется достаточно, а хотелось бы иметь свою родную, созданную в среде Clariona, либо другую не "родную" , но озвучивающую текст из вышеуказанных контролов.
Может кто решал похожую задачу ? Просветите в данном вопросе.
С уважением Stalker.

Stalker писал(а):Привет, всем профи Clariona!
Наклюнулась идея озвучивания текста в RTF либо TxText контроле.
Искал на форуме, но запрос на фразу "озвучивание" ничего не показал. Говорилок имеется достаточно, а хотелось бы иметь свою родную, созданную в среде Clariona, либо другую не "родную" , но озвучивающую текст из вышеуказанных контролов.
Может кто решал похожую задачу ? Просветите в данном вопросе.
С уважением Stalker.

В принципе, разговаривать умеют персонажи MS Agent (скрепки, колобки, киски-собачки и так далее). Выводили тексты со звуком - душераздирающее зрелище (ушераздирающее слышище Но если очень надо-можно вывести персонажа за краем экрана и попросить его сказать...
Размещаешь на экране OCX ('agent.control.2'), загружаешь файл (например, merlin.acs) и командуешь....

В принципе, разговаривать умеют персонажи MS Agent (скрепки, колобки, киски-собачки и так далее). Выводили тексты со звуком - душераздирающее зрелище (ушераздирающее слышище Но если очень надо-можно вывести персонажа за краем экрана и попросить его сказать...
Размещаешь на экране OCX ('agent.control.2'), загружаешь файл (например, merlin.acs) и командуешь....

Спасибо за подсказку, но MS Agent не устраивает, да и запустить его пока не получается, если можно то подскажите как запустить более подробно. Нужен какой-либо движок для озвучивания типа Sam, чтобы читал либо весь текст в контроле, либо выделенную часть.
С уважением Stalker.

Добрый день!

0. Надо найти русифицированный интерфейс TTS (Text to speech). Когда мне надо было, я нашёо минут за 20.
Говорят, что есть на http://activex.microsoft.com/activex/co ... ttsrur.exe . Врут, наверное...
1.Во-первых, в системе должен быть установлен MS Agent. Обычно это находится в каталоге Windows\MsAgent
2.Надо найти персонажа. Обычно это файл с расширением Acs. Персонаж Merlin.acs обычно есть в Windows. Другие могут быть поставлены вместе с MS Word.
3.Создаём OCX
Agent# = Create(0,Create:ole)
Agent#{Prop:Create}='Agent.Control.2'}
4.Загружаем персонажа. Будем считать, что файл в текущем каталоге
FileName = LongPath() & '\merlin.acs'
Agent#{'Character.Load("Merlin","' & Filename & '")'}
5. Активизируем агента
Agent#{'Connected'}=-1
6. Даём команды агентам
Text = 'Произносимый текст'
Agent#{'Characters("Merlin").Speak("' & Text & '")'}

А остальное всё в документации. Или в Интернете. Удачи!

Если есть возможность - купи EasyCOM2INC
С ним легко управлять MS Agen`ом, пример в наличии. Ну и для других целей пригодится!

Большое спасибо за помощь Бальшому Гуру и Admin!
Два разных совета но как раз дополнили друг друга.

Первое, сделал как советовал Бальшой Гуру! Все скачалось с буржуйского сайта и установилось. Как ни странно ничего не заглючило и не ругнулось, то есть совет очень верный, но к сожелению не пошло.В окне создал кнопку и вписал выполнить код по ее нажатию.Ничего не глючит, но и ничего и не говорит. Работаю 6.3. Пробовал в XP и в Win 2000. Merlin есть, путь задан коректно, колонки работают но не говорит ничего. Буду дальше копаться в литературе, должно все-таки пойти, чуствую направление верное.

Попробовал второй путь. скачал софт *сом с ingasoft, по совету Admin. Просмотрел пример работы с агентом.Пример простой, загрузился нормально, проблемм нет.Из примера можно взять, метод работы с агентом в качестве помощника.Выводит необходимый текст, который прописываешь, тоесть можно организовать хорошую красивую справку по функциям программы, но тоже не проговаривает. Издает красивые звуки, хорошая анимация, но опять не проговаривает необходимый текст. Возможно в примере показаны ограниченные возможности.
Тем не менее, большое спасибо за помощь и лампочку в конце длинного темного туннеля.
С глубоким уважением ко всем откликнувшимся Stalker!

Stalker писал(а):не проговаривает необходимый текст

MS SAPI стоит? (без этого по моему MS Agent не умеет спикать)
Может сходить на MS и скачать все что нужно?
Языки кстати тоже нужно ставить.

Ссылки по теме:
http://www.microsoft.com/msagent/downloads/
http://activex.microsoft.com/activex/co ... pchapi.exe
http://activex.microsoft.com/activex/co ... Sagent.exe
http://speech-soft.ru/index.php?a=stat& ... 1181101979

P.S. Кстати гугль как обычно - рулит

Попробовал второй путь. скачал софт *сом с ingasoft, по совету Admin. Просмотрел пример работы с агентом.Пример простой, загрузился нормально, проблемм нет.Из примера можно взять, метод работы с агентом в качестве помощника.Выводит необходимый текст, который прописываешь, тоесть можно организовать хорошую красивую справку по функциям программы, но тоже не проговаривает. Издает красивые звуки, хорошая анимация, но опять не проговаривает необходимый текст. Возможно в примере показаны ограниченные возможности.

Помнится, у меня чего-то не хватало для озвучивания текста на момент написания примера, какого-то девайса что-ли или api, вот я и не стал её реализовывать.

Возможно, надо добавить ещё команду Agent#{'Characters("Merlin").Show'} и Agent#{'Characters("Merlin").Moveto(...)''}
К сожалению, рабочий пример мне сейчас недоступен...

На ниже указанной ссылке можно найти неплохой контрол по работе с агентом.А ключик можно найти в привате в соответствующей capesoft папке
http://www.capesoft.com/accessories/downloads.htm
Stalker