Re: Asterisk Russian Voice Prompts
вот сам vbs скрипт:
strText = "текст, который сказать"
Set objVoice = CreateObject("SAPI.SpVoice")
Set objFile = CreateObject("SAPI.SpFileStream.1")
'относительно закомментированного не помню, сейчас под рукой винды нет проверить
'Set objFormat = CreateObject("SAPI.SpAudioFormat")
'set objFormat.Type = "SAFT22kHz16BitStereo"
'set objFile.Format = objFormat
objFile.Open "wait.wav", 3
Set objVoice.AudioOutputStream = objFile
objVoice.Speak strText
При этом в панель управления -> речь должен быть выбран нужный голос, скорость и т.д.
Насколько помню, не получилось сделать чтобы одновременно 2 файла генерировались. И время на генерирование равно длительности полученного звука, для этого движка вроде скорость записи не увеличить. Но может что напутал, последний раз в декабре этим баловался.
Если использовать голос Николай от Digalo, то можно воспользоваться консольной версией "Говорилки" (SAPI4) вместо этого скрипта.
Если кому интересно - braams@yandex.ru
|