Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

W systemie Windows jest fajna funkcja, która pozwala sprawić, by komputer mówił lub mówił cokolwiek mu 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 używany przez funkcję ułatwień dostępu zamiany tekstu na mowę wbudowaną w system Windows. Możesz także pisać programy, które wywołują API, co pozwoliłoby twoim aplikacjom mówić, ale to dla programistów.

Spis treści

  • Wprowadź tekst, wypowiedz wiadomość
  • Skonfiguruj ustawienia głosowe SAPI
  • Zaplanuj plik skryptu

Sprawienie, by komputer powiedział, czego chcesz, jest w rzeczywistości całkiem łatwe! W tym artykule pokażę, jak utworzyć skrypt VBS, który pobierze tekst od użytkownika, a następnie go wymówi. Wspomnę również, jak zakodować tekst, który chcesz wymówić, a następnie zaplanować uruchamianie tego skryptu w przypadku określonych zdarzeń, takich jak uruchomienie systemu Windows lub wylogowanie.

Wprowadź tekst, wypowiedz 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(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

Pamiętaj, że kiedy skopiujesz tekst z przeglądarki internetowej i wkleisz go do Notatnika, cudzysłowy będą powodować problemy. Przed zapisaniem pliku należy przejrzeć i usunąć każdy cytat („”), a następnie wpisać go ponownie. W poniższym przykładzie jest sześć cytatów. Powinno to wyglądać mniej więcej tak, jak na obrazku poniżej.

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

Teraz, kiedy idziesz, aby zapisać plik, nadaj mu dowolną nazwę, ale upewnij się, że po nazwie wpisałeś także .VBS . Następnie w polu Zapisz jako typ wybierz Wszystkie pliki zamiast domyślnych Dokumentów tekstowych.

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

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.

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

Jeśli wszystko zrobiłeś dobrze, powinieneś usłyszeć męski lub żeński głos wypowiadający twoje zdanie. Jeśli pojawi się jakikolwiek komunikat o błędzie, skopiuj i wklej tekst ponownie i zastąp te cytaty.

Skonfiguruj ustawienia głosowe SAPI

To jest fajne, ale możemy też skonfigurować nasz mały gadający komputer z różnymi ustawieniami. Możemy zmienić głośność, jak szybko lub wolno mówi głos i zmienić płeć między męską i żeńską. Oto przykładowy kod, w którym dodałem kilka dodatkowych linii.

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
Set sapi.Voice = sapi.GetVoices.Item(1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak message

Domyślna szybkość to 0, a zakres wynosi od -10 do 10. -10 sprawi, że głos będzie mówił bardzo wolno, a 10 będzie mówić bardzo szybko. Głośność jest domyślnie ustawiona na 100, a zakres wynosi od 0 do 100. Wiersz rozpoczynający się od Set sapi.Voice umożliwi zmianę na inny głos, jeśli jest zainstalowany w systemie.

Pamiętaj, że liczba głosów do wyboru zależy od systemu operacyjnego. W Windows 7 jest tylko jeden głos, Microsoft Anna.

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

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

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

Jak zmusić komputer do mówienia / mówienia tego, co wpisujesz

Jeśli w systemie jest zainstalowany tylko jeden głos, musisz zmienić sapi.GetVoices.Item(1) na sapi.GetVoices.Item(0) , w przeciwnym razie podczas próby uruchomienia skryptu pojawi się komunikat o błędzie. 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.

Set VObj = CreateObject(“SAPI.SpVoice”)
For Each Voice In VObj.getvoices
I = I + 1
msgbox “” & (I – 1) & ” – ” & Voice.GetDescription
Next

Do tej pory używaliśmy tego wyskakującego okna dialogowego do wprowadzania tekstu, ale możesz też po prostu wpisać swoją wiadomość do pliku skryptu. Byłoby to przydatne, gdybyś chciał zaplanować automatyczne uruchamianie skryptu. Oczywiście można to wykorzystać do żartowania znajomym i rodzinie i działa to naprawdę dobrze.

Wyobraź sobie, że ktoś włącza swój komputer i słyszy, jak komputer mówi do niego: „Cześć John, jestem bardzo śpiący, proszę, nie przeszkadzaj mi dzisiaj!” kiedy się uruchamia! Mogę ci obiecać z doświadczenia, że ​​to histeria i zdecydowanie powinieneś tego spróbować.

Aby zakodować wiadomość na stałe, po prostu zmień ostatnią linię na coś takiego:

sapi.Speak “Hello John, I am very tired today!”

Zaplanuj plik skryptu

Teraz, gdy masz zakodowaną wiadomość dla zamierzonego celu, po prostu musisz ją uruchomić, kiedy chcesz. Jeśli jesteś obeznany z technologią, możesz użyć programu takiego jak AutoIt , który pozwoli ci robić ekstremalne rzeczy, takie jak uruchamianie pliku skryptu, gdy określony program jest otwierany lub gdy okno jest maksymalizowane lub minimalizowane.

Nie mam czasu, aby zagłębić się w to wszystko w tym poście, ale na szczęście Microsoft ma wbudowaną funkcję o nazwie Harmonogram zadań, która pozwala łatwo wykonywać dość skomplikowane rzeczy za pomocą skryptów.

Mój poprzedni post szczegółowo opisuje, jak zaplanować uruchomienie pliku skryptu , gdy wystąpią określone zdarzenia w systemie Windows. Jeśli masz problemy z uruchomieniem skryptu, napisz komentarz, a postaram się pomóc. Cieszyć się!

Zostaw komentarz

Jak wyczyścić obudowę aparatu retencyjnego: bezpieczna i prosta procedura, która naprawdę ją osuszy

Jak wyczyścić obudowę aparatu retencyjnego: bezpieczna i prosta procedura, która naprawdę ją osuszy

Dowiedz się, jak czyścić obudowę uchwytu łagodnym mydłem i letnią wodą, jak ją prawidłowo suszyć, jak unikać szkodliwego działania ciepła i jak rozpoznać, kiedy należy wymienić obudowę.

Jak bezpiecznie czyścić filtr powietrza w samochodzie: kiedy czyścić, kiedy wymienić

Jak bezpiecznie czyścić filtr powietrza w samochodzie: kiedy czyścić, kiedy wymienić

Dowiedz się, jak przeprowadzać inspekcję i serwisować filtr powietrza silnika, kiedy czyszczenie jest wskazane, kiedy wymiana jest bezpieczniejsza i jak sprawdzić poprawność ponownej instalacji.

Jak wyczyścić kostkarkę do lodu w zamrażarce: Poradnik dla początkujących

Jak wyczyścić kostkarkę do lodu w zamrażarce: Poradnik dla początkujących

Dowiedz się, jak bezpiecznie czyścić kostkarkę do lodu w zamrażarce, w tym pojemnik na lód, dostępne powierzchnie kostkarki, otwór dozownika, suszenie, ponowny montaż i jakich błędów należy unikać.

Jak bezpiecznie czyścić dyszę bidetową: co działa, a czego należy unikać

Jak bezpiecznie czyścić dyszę bidetową: co działa, a czego należy unikać

Dowiedz się, jak bezpiecznie czyścić dyszę bidetową, na czym tak naprawdę polega samoczyszczenie, jak radzić sobie z nagromadzonymi minerałami i które środki czyszczące są najlepsze dla Twojego konkretnego modelu.

Jak wyczyścić filtr piaskowy w basenie: płukanie wsteczne, płukanie i wiedza, kiedy zanurzyć się głębiej

Jak wyczyścić filtr piaskowy w basenie: płukanie wsteczne, płukanie i wiedza, kiedy zanurzyć się głębiej

Dowiedz się, jak bezpiecznie czyścić filtr piaskowy w basenie, oceń, czy płukanie wsteczne zadziałało, a także dowiedz się, kiedy uzasadnione jest dokładniejsze czyszczenie, naprawa lub wymiana złoża.

Jak bezpiecznie czyścić młynek do kawy: 8-etapowy przewodnik po młynkach żarnowych i ostrzowych

Jak bezpiecznie czyścić młynek do kawy: 8-etapowy przewodnik po młynkach żarnowych i ostrzowych

Dowiedz się, jak bezpiecznie czyścić młynek do kawy – od suchego szczotkowania żaren po mycie wyjmowanych części, ponowny montaż, testowanie i pielęgnację ostrzy młynka.

Jak usunąć klej do paznokci z ubrań, nie niszcząc materiału

Jak usunąć klej do paznokci z ubrań, nie niszcząc materiału

Dowiedz się, jak bezpiecznie usuwać klej do paznokci z ubrań – począwszy od zeskrobywania zaschniętego kleju, przez ostrożne stosowanie acetonu, pranie, aż po sprawdzanie materiału przed suszeniem.

Jak usunąć pozostałości po naklejkach z ubrań bez uszkadzania tkaniny

Jak usunąć pozostałości po naklejkach z ubrań bez uszkadzania tkaniny

Dowiedz się, jak bezpiecznie usuwać pozostałości naklejek z ubrań – poprzez obróbkę na zimno, wstępną obróbkę, ostrożne stosowanie rozpuszczalników, pranie i suszenie na powietrzu.

Jak bezpiecznie czyścić klawiaturę mechaniczną: 4-etapowy poradnik gruntownego czyszczenia

Jak bezpiecznie czyścić klawiaturę mechaniczną: 4-etapowy poradnik gruntownego czyszczenia

Dowiedz się, jak bezpiecznie czyścić klawiaturę mechaniczną, m.in. jak czyścić wyjmowane nakładki klawiszy, usuwać kurz, brud, osuszać i ponownie składać klawiaturę, a także kiedy przerwać i sprawdzić instrukcję obsługi.

Jak usunąć klej z ubrań, nie uszkadzając materiału

Jak usunąć klej z ubrań, nie uszkadzając materiału

Dowiedz się, jak delikatnie usunąć klej z ubrań, kiedy użyć kleju na gorąco lub superkleju, a także jak sprawdzić tkaninę przed wyschnięciem.