Jak vytvořit svůj počítač mluvit / mluvit, co píšete

Ve Windows je skvělá funkce, která vám umožní, aby váš počítač mluvil nebo mluvil, co mu řeknete! Tato metoda využívá vestavěného rozhraní API nainstalovaného ve Windows XP, Vista, 7, 8 a 10 nazvaném SAPI (Speech Application Programming Interface)..

Microsoft Speech API je to, co se používá pro funkci usnadnění převodu textu na řeč zabudovanou ve Windows. Můžete také psát programy, které volají API, což vám umožní nechat vaše aplikace mluvit, ale to je pro vývojáře.

Jen dělat svůj počítač říct, co chcete, je docela snadné! V tomto článku vám ukážu, jak vytvořit skript VBS, který bude mít textový vstup od uživatele a poté jej promluvit. Zmíním se také o tom, jak pevný kód textu, který chcete mluvit, a pak naplánovat spuštění skriptu na konkrétních událostech, jako je spuštění systému Windows nebo odhlášení.

Vstupní text, Speak Message

Začněme s jednoduchým skriptem, který vyskakuje dialogové okno, ve kterém můžete napsat, co chcete, aby systém Windows mluvil. Nejprve otevřete Poznámkový blok.

Krok 1: Vložte následující text do nového dokumentu:

Dim zprávu, sapi
message = InputBox (“Zadejte text, který chcete mluvit”, “Speak This”)
Nastavit sapi = CreateObject (“sapi.spvoice”)
zpráva sapi.Speak

Všimněte si, že když kopírujete text z webového prohlížeče a vložíte jej do programu Poznámkový blok, uvozovky způsobí problémy. Než uložíte soubor, musíte projít a odstranit každou citaci (“) a znovu zadat nabídku. V následujícím příkladu je šest citací. Mělo by to vypadat jako na obrázku níže.

Nyní, když jdete uložit soubor, dát mu jméno, ale ujistěte se, že také typ .VBS za jménem. Další, pro Uložit jako typ vyberte možnost Všechny soubory místo výchozích textových dokumentů.

Nyní poklepejte na soubor VBS a měli byste vidět vstupní pole, ve kterém můžete zadat text, který chcete mluvit! Zadejte něco a klepněte na tlačítko OK.

Pokud jste udělali všechno správně, měli byste slyšet buď mužský nebo ženský hlas, který vyslovuje vaši větu. Pokud se zobrazí jakákoli chybová zpráva, zkopírujte a vložte text znovu a nahraďte tyto citace.

Konfigurace nastavení hlasu SAPI

To je legrace, ale můžeme také nastavit náš malý mluvící počítač s různým nastavením. Můžeme změnit hlas, jak rychle nebo zpomalit hlasové rozhovory a změnit pohlaví mezi muži a ženami. Zde je příklad kódu, do kterého jsem přidal několik dalších řádků.

Dim zprávu, sapi
message = InputBox (“Zadejte text, který chcete mluvit”, “Speak This”)
Nastavit sapi = CreateObject (“sapi.spvoice”)
Nastavit sapi.Voice = sapi.GetVoices.Item (1)
sapi.Rate = 0
sapi.volume = 100
zpráva sapi.Speak

Výchozí hodnota je 0 a rozsah je -10 až 10. -10 bude mít hlas mluvit super pomalu a 10 bude mluvit super rychle. Hlasitost je standardně nastavena na 100 a rozsah je 0 až 100. Řádek, který začíná znakem Nastavit sapi.Voice vám umožní změnit na jiný hlas, pokud je nainstalován ve vašem systému.

Všimněte si, že počet hlasů, ze kterých si můžete vybrat, závisí na operačním systému. Ve Windows 7 je pouze jeden hlas, Microsoft Anna.

Ve Windows 10 existují dva hlasy: Microsoft David a Microsoft Zira, jak je uvedeno níže.

Pokud je ve vašem systému nainstalován pouze jeden hlas, je třeba jej změnit sapi.GetVoices.Item (1) na sapi.GetVoices.Item (0), jinak se při pokusu o spuštění skriptu zobrazí chybová zpráva. Můžete také vytvořit další dokument programu Poznámkový blok a vložit níže uvedený kód, který vám řekne, jaké hlasy jsou nainstalovány. Uložte ji jako soubor ve formátu VBS, jak je uvedeno výše, a spusťte jej.

Nastavit VObj = CreateObject (“SAPI.SpVoice”)
Pro každý hlas VObj.getvoices
I = I + 1
"" & (I - 1) & "-" & Voice.GetDescription
další

Doposud používáme tento vyskakovací dialog pro zadávání textu, ale můžete také jednoduše napsat zprávu do souboru skriptu. To by bylo užitečné, pokud chcete naplánovat spuštění skriptu automaticky. Je zřejmé, že to může být použito pro žertování vašich přátel a rodiny a funguje to opravdu dobře.

Jen si představte, že někdo zapnul počítač a slyšel, jak jim počítač říká: „Ahoj Johne, jsem velmi ospalý, prosím, nevadí mi to dnes!“ Když se zvedne! Můžu vám slibovat zkušenosti, je to hysterické a určitě byste si to měli vyzkoušet.

Chcete-li kódovat zprávu, jednoduše změňte poslední řádek na něco takového:

sapi.Speak „Ahoj Johne, jsem dnes velmi unavený!“

Plán skriptového souboru

Teď, když jste zaslali svou zprávu pro zamýšlený cíl, stačí ji spustit, když chcete. Pokud jste tech-důvtipný, můžete použít program, jako je AutoIt, který vám umožní dělat extrémní věci, jako je spuštění skriptového souboru, když je otevřen určitý program nebo když je okno maximalizováno nebo minimalizováno.

Nemám čas se dostat do toho všeho, co je v tomto příspěvku, ale naštěstí má Microsoft vestavěnou funkci nazvanou Plánovač úloh, která vám umožňuje snadno vytvářet složité věci se skripty..

Můj předchozí příspěvek jde do hloubky o tom, jak naplánovat spuštění skriptového souboru při výskytu určitých událostí v systému Windows. Máte-li potíže se skripty do práce, napište nám komentář a pokusím se pomoci. Užívat si!