Hloupé Geek triky Jak udělat svůj počítač s vámi promluvit

Inteligentní stroje schopné řeči jsou často předmětem futuristických filmů sci-fi, ale můžete přeměnit libovolný počítač na chatu Cathy. Přestože ještě nejsme v pódiu s počítači, kde mohou s námi komunikovat jako lidé, existuje několik nástrojů a jednoduchých skriptů, které můžeme napsat, aby se na nás obrátil jakýkoli počítač, na kterém běží systém Windows.

Malá (vizuální) základní historie

V roce 1988 se objevila první iterace VBScript nebo (Visual Basic Scripting Edition) a byla stále velmi primitivní verzí toho, co máme dnes. V průběhu let se zvýšila potřeba snadno použitelného a lehkého skriptovacího jazyka pro Microsoft. Z tohoto důvodu společnost pokračovala v práci a nakonec ji zveřejnila v roce 1996.

Jedná se o jednoduchý skript, který používá COM (Component Object Model) k vytváření, čtení, aktualizaci a mazání souborů v operačních systémech Microsoft. Od vydání Windows 98 byl nainstalován s každým počítačem. Je vysoce univerzální vzhledem k tomu, že hostitelské prostředí VBScript může být vloženo do programů pomocí programu Microsoft Script Control. Používá se často s Internetovými informačními službami, Windows Script Host a Internet Explorer.

Ale to je dost technického jabberu. Pojďme se k němu a naučíme se, jak váš počítač mluvit!

Jednoduché použití VBScripts

Vytvoření vizuálního základního skriptu je velmi snadné a nevyžaduje žádné speciální programy. Ačkoli existují programy, které můžete použít k psaní více vysoce pokročilých skriptů, většina programátorů a lidí, kteří dabble při psaní skriptů používají Poznámkový blok společnosti Microsoft.

Začněte proces otevřením programu Poznámkový blok. Po otevření programu Poznámkový blok stačí zadat následující kód nebo jej jednoduše zkopírovat a vložit do okna poznámkového bloku. Chcete-li změnit, co váš skript dělá počítač říci, jednoduše nahradit oddíl, který říká "Geeks zdědí zemi" s tím, co chcete slyšet.

tlumená řečová množina speechobject = createobject ("sapi.spvoice") speechobject.speak "Geekové zdědí zemi"

Po úspěšném zadání textu, který chcete slyšet, stačí stisknout "Soubor" a kliknout na možnost "Uložit jako ...".

Najděte místo, kam chcete obrázek uložit. U tohoto příkladu jej ukládám do prázdné složky v adresáři Stahování. Důležitá věc, kterou musíte udělat, je název, který končí s .vbs. Tím bude počítač informovat o tom, že neukládáte soubor prostého textu; spíše ukládáte VBScript. Tento vzorek pojmenujeme "Geek test.vbs", jak je uvedeno níže.

Nyní můžete pokračovat a zavřít poznámkový blok a přejděte do složky, kde jste uložili VBScript. Všimnete si, že ikona není normální ikona TXT. Je to malý modrý svitek na bílém pozadí. Poklepáním na tuto ikonu spustíte skript pro jedno použití a posloucháte svůj text. Gratulujeme, právě jste vytvořili svůj první skript.

Nyní, abyste se na to dostali, zkuste vytvořit další skripty s jakýmkoli textem, který chcete slyšet. Případně můžete kliknout pravým tlačítkem myši na VBScript a zvolit volbu "Otevřít s ..." a potom zvolit zápisník pro úpravu textu ve stejném souboru.

Skript textu do řeči

Nyní, když víte, jak napsat scénář pro jedno použití a pravděpodobně jste s ním několikrát hráli, můžete se trochu znudit. To je důvod, proč to uděláme.

Další věc, kterou se naučíme, je, jak vytvořit skript, který je o něco pokročilejší než skript s jedním použitím. Tím vytvoříte dialogové okno, do něhož můžete zadávat text a nechat ji číst zpět v počítači.

Začněte tím, že znovu otevřete poznámkový blok a zadáte tento skript nebo jej zkopírujte a vložte do okna poznámkového bloku.

 Zpráva dim, sapi message = InputBox ("Co mám říct, vaše geekness?", "Mluvím za vás.") Nastavit sapi = CreateObject ("sapi.spvoice") sapi.Speak message

Po zadání kódu jednoduše soubor uložíte jako "Text to Speech.vbs", jak je uvedeno dříve, abyste dokončili skript. Jakmile byl uložen, přejděte na místo, kde se nachází, a dvakrát klikněte na něj. Všimnete si, že okno je nazýváno "já mluvím za vás." A výzva k zadání textu, který má být vokalizován, je "Co mám říkat, vaši mágnost?" Můžete je vždy změnit, abyste řekl cokoli chcete.

Prozatím, pojďme se dostat "Geeks zdědí zemi" a pak stiskněte tlačítko "OK" spustíte skript a slyšíte váš text nahlas.

Pozdravy VBScript Script

Tohle je dost zábavné, ale počítač stále s vámi příliš neleží. Nyní zkusíme jiný jednoduchý skript, který bere v úvahu denní čas, stejně jako odpovídající reakci na denní dobu. Tento skript bude číst čas vašeho počítače a na základě toho vás určitě pozdraví.

Začněte tím, že otevřete poznámkový blok a vložíte tento krátký skript. Můžete si nahradit sekci, která má pozdravy dne s jakoukoli frází, kterou chcete slyšet, a nahradit Geekmeister vlastním jménem.

Nastavte Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str, pokud hodina (čas) 12 pak pokud hodina (čas)> 16 pak Sapi.speak "Good evening Geekmeister" jiný Sapi.speak "Good afternoon Geekmeister" pokud skončí

Nyní můžete textový dokument uložit jako soubor VBS. Jakmile to uděláte, přejděte do složky, ve které je uložen, a dvakrát klikněte na něj. Na základě doby, kdy se váš počítač zobrazí, bude buď říkat "Dobré ráno, dobré odpoledne nebo dobrý večer Geekmeister."

Scénář říká, že pokud hodiny čte něco před 12, je ráno a všechno po 12 je odpoledne; má však také klauzuli, která říká, že i když je po 12, pokud je čas kolem 16:00 (16:00), stane se večer.

Skript VBScript časového dne

Pokud byste se chtěli trochu rozvinout a dostat čas, můžete vytvořit nový zápisník a zadat tento skript.

Skript může vypadat komplikovaně, ale v podstatě říká, co má počítač říct a jak to říci, na základě času, který je zobrazen na hodinách vašeho počítače. Vždy můžete nahradit "aktuální čas" každým úvodem po dobu, kterou chcete.

Nastavit Sapi = Wscript.CreateObject ("SAPI.SpVoice") Sapi.speak "Aktuální čas je"

pokud hodina (čas)> 12 pak Sapi.speak hodina (čas) -12 jiný, pokud hodina (čas) = ​​0 pak Sapi.speak "12" jiný Sapi.speak hodina (čas)

pokud minuta (čas) < 10 then Sapi.speak "o" if minute(time) < 1 then Sapi.speak "clock" else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if

pokud hodina (čas)> 12 pak Sapi.speak "P.M." else, pokud hodina (čas) = ​​0 pak pokud minutu (čas) = ​​0 pak Sapi.speak "Midnight" jinak Sapi.speak "A.M." konec jestliže v případě, že hodina (čas) = ​​12 pak pokud minutu (čas) = ​​0 pak Sapi.speak "noon" jinak Sapi.speak "P.M." koncový jestliže jiný Sapi.speak "A.M." end if end if end pokud

Nyní stačí uložit soubor jako VBScript, jako jste učinili v předchozích krocích, a pak přejděte do této složky. Pokud vše proběhne dobře, měli byste jej dvakrát kliknout a slyšet počítač, který vám řekne čas.

Startup pozdrav

Nyní, když víte, jak vás pozdravit a povědět vám čas, co je skvělé, kdyby to počítač udělal při zapnutí počítače. Je to opravdu velmi snadné, pokud jen skombinujete dva skripty a vložte je na správné místo.

Začněte tím, že otevřete Microsoft notepad a zkopírujete tento kód do okna. Je to prostě kopie obou kódů kombinovaných pro vás. Nezapomeňte, že můžete změnit pozdrav na "Co je to kámo, Dobrý den mistr, Pozdravte svou všemohoucí vysokost" nebo něco, co chcete, aby vám váš počítač řekl.

Nastavte Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str, pokud hodina (čas) 12 pak pokud hodina (čas)> 16 pak Sapi.speak "Good evening Geekmeister" jiný Sapi.speak "Good afternoon Geekmeister" pokud skončí, pokud Sapi.speak "Aktuální čas je"

pokud hodina (čas)> 12 pak Sapi.speak hodina (čas) -12 jiný, pokud hodina (čas) = ​​0 pak Sapi.speak "12" jiný Sapi.speak hodina (čas)

pokud minuta (čas) < 10 then Sapi.speak "o" if minute(time) < 1 then Sapi.speak "clock" else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if

pokud hodina (čas)> 12 pak Sapi.speak "P.M." else, pokud hodina (čas) = ​​0 pak pokud minutu (čas) = ​​0 pak Sapi.speak "Midnight" jinak Sapi.speak "A.M." konec jestliže v případě, že hodina (čas) = ​​12 pak pokud minutu (čas) = ​​0 pak Sapi.speak "noon" jinak Sapi.speak "P.M." koncový jestliže jiný Sapi.speak "A.M." end if end if end pokud

Jakmile jste celý kód zkopírovali přesně tak, jak to je, do zápisníku, pokračujte a uložte jej jako "Startup greeting.vbs". Může být také nazýváno cokoli chcete, ale pro účely této demonstrace je jednodušší, když jsme všichni na stejné stránce. Nyní, když byl uložen, můžete dvojitým kliknutím na soubor VBScript slyšet, jak vás pozdraví a že vám řekne čas.

Pokud chcete, aby se přehrával při zapnutí počítače, jako je Jarvis z Iron Man, jednoduše vyberte soubor a přetáhněte ho myší dolů na tlačítko "Start". Bez uvolnění myši jej přesuňte na "Všechny programy" a pak najděte do složky "Startup" a uvolněte tlačítko myši.

Pokud z nějakého důvodu pro vás to nefunguje, můžete také ručně přejít do spouštěcí složky. Najprve se dostanete do složky, kde je uložena vaše "Startup greeting.vbs" a zkopírujte ji.
Dalším krokem je zadat následující cestu do horní části okna Průzkumníka a stisknout "Enter". Budete muset změnit jméno uživatele USERNAME s názvem, který používáte pro váš počítačový účet.

C: \ Uživatelé \ USERNAME \ AppData \ Roaming \ Microsoft \
Windows \ Start Menu \ Programs \ Startup

Jakmile jste ve spouštěcí složce, prostě vložte soubor VBS a máte dobré jít. Nyní při příštím spuštění počítače a přihlášení by vás měl automaticky pozdravit a informovat o jakém čase.

Máte-li nějaké potíže s vytvářením některého ze skriptů, mohou je používat ke stažení pomocí těchto odkazů.

1. Geek Test
2. Pozdrav
3. Startup pozdrav
4. Doba rozprávě
5. Text na řeč