Jak sprawić, aby Twój komputer mówił / mów, co piszesz

W systemie Windows jest fajna funkcja, dzięki której komputer może mówić lub mówić cokolwiek powiesz! Ta metoda wykorzystuje wbudowany interfejs API zainstalowany w systemach Windows XP, Vista, 7, 8 i 10 o nazwie SAPI (Speech Application Programming Interface).

Interfejs Microsoft Speech API jest wykorzystywany w funkcji dostępności tekstu na mowę wbudowanej w system Windows. Możesz także pisać programy, które wywołują API, co pozwala na mówienie aplikacji, ale to jest dla programistów.

Samo ustawienie komputera na to, co chcesz, jest całkiem proste! W tym artykule pokażę, jak utworzyć skrypt VBS, który pobierze tekst od użytkownika, a następnie go wypowie. Wspomnę również o tym, jak kodować tekst, który chcesz wypowiedzieć, a następnie zaplanować uruchamianie tego skryptu na określonych wydarzeniach, takich jak uruchamianie systemu Windows lub wylogowywanie się.

Wprowadź tekst, mów wiadomość

Zacznijmy od prostego skryptu, który wyświetli okno dialogowe, w którym możesz wpisać, co ma mówić system Windows. Najpierw otwórz Notatnik.

Krok 1: Wklej następujący tekst do nowego dokumentu:

Dim message, sapi
message = InputBox („Wpisz tekst, który chcesz wypowiedzieć”, „Speak This”)
Ustaw sapi = CreateObject („sapi.spvoice”)
wiadomość sapi.Speak

Pamiętaj, że gdy kopiujesz tekst z przeglądarki internetowej i wklejasz go do Notatnika, cytaty powodują problemy. Przed zapisaniem pliku musisz przejść i usunąć każdy cytat („) i ponownie wpisać cytat. W poniższym przykładzie jest sześć cytatów. Powinien wyglądać jak na poniższym obrazku.

Teraz, gdy przejdziesz do zapisania pliku, nadaj mu dowolną nazwę, ale upewnij się, że również wpisujesz .VBS po imieniu. Dalej, dla Zapisz jako typ pole, wybierz Wszystkie pliki zamiast domyślnych dokumentów tekstowych.

Teraz kliknij dwukrotnie plik VBS i powinieneś zobaczyć pole wprowadzania, w którym możesz wpisać tekst, który chcesz wypowiedzieć! Wpisz coś i kliknij OK.

Jeśli zrobiłeś wszystko dobrze, powinieneś usłyszeć głos męski lub żeński, który wypowiada twoje zdanie. Jeśli pojawi się jakikolwiek komunikat o błędzie, pamiętaj, aby skopiować i wkleić tekst ponownie i zastąpić te cytaty.

Skonfiguruj ustawienia głosowe SAPI

To jest zabawne, ale możemy również skonfigurować nasz mały komputer do rozmowy z różnymi ustawieniami. Możemy zmienić głośność, szybkość lub spowolnienie głosu i zmienić płeć między mężczyzną i kobietą. Oto przykładowy kod, w którym dodałem kilka dodatkowych wierszy.

Dim message, sapi
message = InputBox („Wpisz tekst, który chcesz wypowiedzieć”, „Speak This”)
Ustaw sapi = CreateObject („sapi.spvoice”)
Ustaw sapi.Voice = sapi.GetVoices.Item (1)
sapi.Rate = 0
sapi.volume = 100
wiadomość sapi.Speak

Domyślna wartość to 0, a zakres wynosi od -10 do 10. -10, a głos będzie mówił bardzo wolno, a 10 będzie mówić bardzo szybko. Wartość domyślna to 100, a zakres od 0 do 100. Linia zaczynająca się od Ustaw sapi.Voice umożliwi zmianę na inny głos, jeśli jest zainstalowany w systemie.

Pamiętaj, że liczba głosów, z których możesz wybierać, zależy od systemu operacyjnego. W systemie Windows 7 jest tylko jeden głos, Microsoft Anna.

W systemie Windows 10 istnieją dwa głosy: Microsoft David i Microsoft Zira, jak pokazano poniżej.

Jeśli w systemie jest zainstalowany tylko jeden głos, musisz to zmienić sapi.GetVoices.Item (1) do sapi.GetVoices.Item (0), w przeciwnym razie pojawi się komunikat o błędzie podczas próby uruchomienia skryptu. Możesz także utworzyć inny dokument Notatnika i wkleić poniższy kod, który powie Ci, jakie głosy są zainstalowane. Zapisz go jako plik .VBS, jak pokazano powyżej i uruchom go.

Ustaw VObj = CreateObject („SAPI.SpVoice”)
Dla każdego głosu w VObj.getvoices
I = I + 1
msgbox „” i (I - 1) & ”-” i Voice.GetDescription
Kolejny

Do tej pory używaliśmy tego okna dialogowego do wprowadzania tekstu, ale można również po prostu wpisać wiadomość do pliku skryptu. Byłoby to przydatne, gdybyś chciał zaplanować automatyczne uruchamianie skryptu. Oczywiście można to wykorzystać do wyśmiewania przyjaciół i rodziny i działa to naprawdę dobrze.

Wyobraź sobie, że ktoś włącza komputer i słyszy, że komputer mówi im: „Witaj John, jestem bardzo śpiący, proszę, nie przeszkadzaj mi dzisiaj!”, Kiedy się uruchomi! Mogę obiecać ci z doświadczenia, to histeryczne i zdecydowanie powinieneś spróbować.

Aby zakodować wiadomość, po prostu zmień ostatnią linię na następującą:

sapi.Speak „Cześć John, dziś jestem bardzo zmęczony!”

Zaplanuj plik skryptu

Teraz, kiedy już zakodowałeś swoją wiadomość do zamierzonego celu, po prostu musisz ją uruchomić, kiedy chcesz. Jeśli jesteś zaawansowany technicznie, możesz użyć programu takiego jak AutoIt, który pozwoli Ci robić ekstremalne rzeczy, takie jak uruchamianie pliku skryptu, gdy dany program jest otwierany lub gdy okna są zmaksymalizowane lub zminimalizowane.

W tym poście nie mam czasu, aby się tym zająć, ale na szczęście Microsoft ma wbudowaną funkcję zwaną Harmonogramem zadań, która pozwala na łatwe wykonywanie skomplikowanych rzeczy za pomocą skryptów.

Mój poprzedni post opisuje szczegółowo, jak zaplanować uruchamianie pliku skryptu, gdy w systemie Windows wystąpią pewne zdarzenia. Jeśli masz problem z uruchomieniem skryptu, możesz napisać komentarz, a ja postaram się pomóc. Cieszyć się!