Головна » Забавні речі » Як зробити ваш комп'ютер говорити / говорити, що ви типу

    Як зробити ваш комп'ютер говорити / говорити, що ви типу

    Існує цікава функція в Windows, яка дозволяє зробити ваш комп'ютер говорити або говорити все, що ви говорите це! Цей метод використовує вбудований API, інстальований у Windows XP, Vista, 7, 8 і 10 під назвою SAPI (інтерфейс програмування мовлення).

    Спектр Microsoft Speech використовується для функцій доступності тексту в мову, вбудованих у Windows. Ви також можете написати програми, які викликають API, що дозволить вам дозволити своїм програмам говорити, але це для розробників.

    Просто зробіть, щоб ваш комп'ютер сказав, що ви хочете, насправді дуже просто! У цій статті, я покажу вам, як створити скрипт VBS, який візьме введення тексту від користувача, а потім розмовлятиме його. Я також згадаю, як зашифрувати текст, який ви хочете розмовляти, а потім заплануйте, щоб цей сценарій працював на певних подіях, таких як запуск Windows або вихід з системи.

    Введіть текст, поговоріть повідомлення

    Давайте почнемо з простого скрипта, який з'явиться у діалоговому вікні, де ви можете ввести те, що ви хочете говорити в Windows. Спочатку відкрийте Блокнот.

    Крок 1: Вставте наступний текст у новий документ:

    Dim повідомлення, сапі
    message = InputBox ("Введіть текст, який ви хочете говорити", "Говорити це")
    Встановити sapi = CreateObject ("sapi.spvoice")
    sapi.Speak повідомлення

    Зауважте, що при копіюванні тексту з веб-браузера і вставленні його в блокнот котирування виникнуть проблеми. Перш ніж зберігати файл, потрібно пройти та видалити кожну цитату (“) та повторно ввести цитату. У наведеному нижче прикладі є шість цитат. Вона повинна виглядати приблизно так, як на малюнку нижче.

    Тепер, коли ви йдете, щоб зберегти файл, дайте йому будь-яке ім'я, але переконайтеся, що ви також вводите .VBS після імені. Далі, для Зберегти як тип вікно, виберіть Усі файли замість текстових документів за замовчуванням.

    Тепер двічі клацніть на файлі VBS, і ви побачите вікно вводу, в якому ви можете ввести текст, який ви хочете говорити! Введіть щось та натисніть OK.

    Якщо ви зробили все правильно, ви повинні почути або чоловічий, або жіночий голос, що висловлює своє рішення. Якщо ви отримуєте будь-яке повідомлення про помилку, переконайтеся, що ви скопіюєте та вставте текст знову та заміните ці лапки.

    Налаштуйте параметри голосу SAPI

    Це весело, але ми також можемо налаштувати наш маленький розмовляючий комп'ютер з різними налаштуваннями. Ми можемо змінювати гучність, швидкість або уповільнення голосових розмов і змінювати стать між чоловіком і жінкою. Ось приклад коду, де я додав кілька додаткових рядків.

    Dim повідомлення, сапі
    message = InputBox ("Введіть текст, який ви хочете говорити", "Говорити це")
    Встановити sapi = CreateObject ("sapi.spvoice")
    Встановити sapi.Voice = sapi.GetVoices.Item (1)
    sapi.Rate = 0
    sapi.volume = 100
    sapi.Speak повідомлення

    За замовчуванням ставка 0, а діапазон від -10 до 10. -10 буде голос говорити супер повільно і 10 буде говорити супер швидко. Гучність за замовчуванням становить 100, а діапазон від 0 до 100. Рядок, що починається з Набір sapi.Voice дозволить вам змінити інший голос, якщо він встановлений у вашій системі.

    Зауважте, що кількість голосів, яку можна вибрати, залежить від операційної системи. У Windows 7 існує тільки один голос, Microsoft Anna.

    У Windows 10 існує два голоси: Microsoft David і Microsoft Zira, як показано нижче.

    Якщо на вашій системі встановлено лише один голос, ви повинні змінити, що говорить sapi.GetVoices.Item (1) до sapi.GetVoices.Item (0), інакше ви отримаєте повідомлення про помилку при спробі запустити сценарій. Ви також можете створити інший документ Блокнота і вставте код, наведений нижче, який повідомить вам, які голоси встановлені. Збережіть його як файл .VBS, як показано вище, і запустіть його.

    Встановити VObj = CreateObject ("SAPI.SpVoice")
    Для кожного голосу в VObj.getvoices
    I = I + 1
    msgbox “” & (I - 1) & ”-” & Voice.GetDescription
    Далі

    До цих пір ми використовували це діалогове вікно для введення тексту, але ви також можете просто ввести своє повідомлення у файл сценарію. Це було б корисно, якщо ви хочете призначити сценарій автоматичному запуску. Очевидно, що це може бути використано для того, щоб розіграти друзів і сім'ю, і це працює дуже добре.

    Тільки уявіть, що хтось повертається на свій комп'ютер і чує, як комп'ютер скаже: «Привіт, Джон, я дуже сонний, будь ласка, не турбуйте мене сьогодні!», Коли він завантажується! Я можу обіцяти вам з досвіду, це істерично, і ви обов'язково повинні спробувати.

    Щоб жорстко кодувати повідомлення, просто змініть останній рядок на щось подібне:

    sapi.Speak “Привіт Джон, я дуже втомився сьогодні!”

    Розклад файлу сценарію

    Тепер, коли ви надіслали повідомлення про потрібну вам мету, вам потрібно просто запустити його, коли захочете. Якщо ви технічно підковані, ви можете використовувати програму, як AutoIt, яка дозволить вам робити екстремальні речі, як запускати файл сценарію, коли відкривається певна програма або коли вікна розгортаються або згортаються..

    У мене немає часу на те, щоб потрапити на все це на цій посаді, але, на щастя, Microsoft має вбудовану функцію, яку називають Планувальником завдань, яка дозволяє легко виконувати деякі досить складні речі зі скриптами..

    Моя попередня публікація глибоко розповідає про те, як запланувати запуск файлу сценарію під час виконання певних подій у Windows. Якщо у вас виникли проблеми з роботою сценарію, не соромтеся розмістити коментар, і я спробую допомогти. Насолоджуйтесь!