Твой компьютер мальчик или девочка? Как узнать имя того, чьим голосом говорит компьютер?

[bga68]

Твой компьютер мальчик или девочка? Как узнать имя того, чьим голосом говорит компьютер?

Неожиданно, шутка получила продолжение, и захотелось узнать, чьим голосом говорит компьютер?

Создаем снова файлик с расширением .vbs и нижеследующим содержанием (или редактируем уже имеющийся):

Set VObj = CreateObject("SAPI.SpVoice") For Each Voice In VObj.getvoices msgbox "" & Voice.GetDescription Next

После запуска скрипта получаем:



Так вот кто ты! Ирина!

В документации указано, что пол компьютера зависит от установленного в системе голоса для преобразования текста в речь. Т.е. в Windows 10.0.14393 т.н. версии 1607 заходим в меню Все параметры:



Далее выбираем Время и язык:



Переходим на пункт Распознавание голоса и выбираем в выпадающем списке Речь: Microsoft Irina Mobile или Microsoft Pavel Mobile:



Таким образом мы можем выбирать пол компьютера. И это работает на Windows 7 и выше.
Но! в русской версии Windows 10.1607 изменение настроек преобразования текста в речь дало неожиданный результат - голос не поменялся. Запуск скрипта выдал поочередно два окошка:





Zira не захотела быть ни Павлом, ни Ириной!

И еще.
Чтобы компьютер при входе пользователя говорил фразу, зависящую от времени суток, нужно в автозагрузку бросить vbs-скриптик с содержанием:

Set Sapi = Wscript.CreateObject("SAPI.SpVoice") dim str if hour(time) < 12 then Sapi.speak "Good Morning bga68" else if hour(time) > 12 then if hour(time) > 16 then Sapi.speak "Good evening bga68" else Sapi.speak "Good afternoon bga68" end if end if end if

Кстати, Windows может говорить по-русски. Поэтому фразу Good Morning / evening / afternoon можно писать по-русски.

Все.