Объект Device/Методы/TextToSound: различия между версиями
Перейти к навигации
Перейти к поиску
Евгений (обсуждение | вклад) |
Евгений (обсуждение | вклад) |
||
Строка 12: | Строка 12: | ||
==Параметры== | ==Параметры== | ||
:{|border="0" cellspacing="0" | :{|border="0" cellspacing="0" | ||
|- | |||
'''Text''' - текст синтезируемого сообщения. | |'''Text''' | ||
| - текст синтезируемого сообщения. | |||
'''Service''' - сервис синтеза Yandex или Google. | |- | ||
|'''Service''' | |||
'''Speed''' - скорость произнесения текста. | | - сервис синтеза Yandex или Google. | ||
|- | |||
'''Voice''' - голос. | |'''Speed''' | ||
| - скорость произнесения текста. | |||
'''Emotion''' - эмоциональная окраска голоса. | |- | ||
} | |'''Voice''' | ||
| - голос. | |||
|- | |||
|'''Emotion''' | |||
| - эмоциональная окраска голоса. | |||
|} | |||
==Результат== | ==Результат== |
Версия 12:00, 27 января 2021
Метод TextToSound выполняет синтез голосового сообщения.
Синтаксис
|
Параметры
Text - текст синтезируемого сообщения. Service - сервис синтеза Yandex или Google. Speed - скорость произнесения текста. Voice - голос. Emotion - эмоциональная окраска голоса.
Результат
- Объект Sound, содержащий синтезированное сообщение.
Описание
- Метод выполняет синтез текста в голосовое сообщения используя технологию Text To Speech (TTS). Голосовая машина используемая для синтеза определяется свойством TTSEngine.
Примеры
- Пример на JavaScript
var Device = new ActiveXObject ("CallOffice.Device");
var NumberPhone = prompt ("Введите номер телефона",'');
Device.Open ();
Device.TTSEngine = "Microsoft Anna - English (United States)"; // Устанавливаем голосовую машину
var Sound = Device.TextToSound ("Hello, this is the program CallOffice!"); // Синтезируем сообщение
var Result = Device.Dial (NumberPhone, 40);
if (Result == 0) {
Device.Say (Sound); // Произносим синтезированное сообщение
}
Device.HangUp ();
Device.Close ();
- Пример на VBScript
Dim Device
Dim Sound
Set Device = CreateObject ("CallOffice.Device")
NumberPhone = prompt ("Введите номер телефона","")
Device.Open
Device.TTSEngine = "Microsoft Anna - English (United States)" ' Устанавливаем голосовую машину
Set Sound = Device.TextToSound ("Hello, this is the program CallOffice!") ' Синтезируем сообщение
Result = Device.Dial (NumberPhone, 40)
if Result = 1 then
Device.Say Sound ' Произносим синтезированное сообщение
end if
Device.HangUp
Device.Close