Ako prinútiť váš počítač hovoriť/hovoriť to, čo píšete

V systéme Windows(Windows) je skvelá funkcia , ktorá vám umožňuje, aby váš počítač hovoril alebo hovoril čokoľvek, čo mu poviete! Táto metóda využíva vstavané rozhranie API(API) nainštalované v systémoch Windows XP(Windows XP) , Vista , 7, 8 a 10 nazývané SAPI ( Speech Application Programming Interface ).

Rozhranie Microsoft Speech API je to, čo sa používa pre funkciu zjednodušenia prevodu textu na reč zabudovanú do systému Windows(Windows) . Môžete tiež napísať programy, ktoré volajú API , čo vám umožní nechať hovoriť vaše aplikácie, ale to je pre vývojárov.

Len prinútiť váš počítač, aby povedal, čo chcete, je v skutočnosti celkom jednoduché! V tomto článku vám ukážem, ako vytvoriť skript VBS , ktorý prevezme textový vstup od používateľa a potom ho vysloví. Tiež spomeniem, ako napevno zakódovať text, ktorý chcete vysloviť, a potom naplánovať spustenie skriptu pri konkrétnych udalostiach, ako je spustenie systému Windows(Windows) alebo odhlásenie.

Zadajte text, vyslovte správu

Začnime jednoduchým skriptom, ktorý zobrazí dialógové okno, v ktorom môžete zadať, čo má systém Windows hovoriť. Najprv(First) pokračujte a otvorte Poznámkový blok(Notepad) .

Krok 1:(Step 1:)  Vložte nasledujúci text do nového dokumentu:

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

Upozorňujeme, že keď skopírujete text z webového prehliadača a vložíte ho do programu Poznámkový blok(Notepad) , úvodzovky spôsobia problémy. Pred uložením súboru musíte prejsť a vymazať každý citát (“) a znova ho zadať. V nižšie uvedenom príklade je šesť úvodzoviek. Malo by to vyzerať ako na obrázku nižšie.

prinútiť počítač hovoriť

Keď teraz prejdete na uloženie súboru, zadajte mu ľubovoľný názov, ale uistite sa, že za názvom napíšete aj .VBS . Potom v poli Uložiť ako typ( Save as type) vyberte možnosť Všetky súbory( All files) namiesto predvoleného textového dokumentu(Text Documents) .

prinútiť počítač hovoriť

Teraz dvakrát kliknite na súbor VBS a mali by ste vidieť vstupné pole, do ktorého môžete zadať text, ktorý chcete vysloviť! Zadajte niečo a kliknite na tlačidlo OK.

hovoriť dialógové okno

Ak ste urobili všetko správne, mali by ste počuť mužský alebo ženský hlas, ktorý vysloví vašu vetu. Ak sa zobrazí akékoľvek chybové hlásenie, nezabudnite text skopírovať a prilepiť znova a nahradiť tieto úvodzovky.

Nakonfigurujte nastavenia hlasu SAPI

Je to zábavné, ale náš malý hovoriaci počítač môžeme nakonfigurovať aj s rôznymi nastaveniami. Môžeme meniť hlasitosť, ako rýchlo alebo pomaly hovorí hlas a meniť pohlavie medzi mužom a ženou. Tu je nejaký príklad kódu, do ktorého som pridal pár riadkov navyše.

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

Predvolená rýchlosť je 0 a rozsah je -10 až 10. -10 spôsobí, že hlas bude hovoriť super pomaly a 10 bude hovoriť super rýchlo. Hlasitosť je predvolená na 100 a rozsah je 0 až 100. Riadok, ktorý začína Set sapi.Voice , vám umožní zmeniť hlas, ak je vo vašom systéme nainštalovaný.

Upozorňujeme, že počet hlasov, z ktorých si môžete vybrať, závisí od operačného systému. V systéme Windows 7(Windows 7) existuje iba jeden hlas, Microsoft Anna .

nainštalované hlasy

V systéme Windows 10(Windows 10) existujú dva hlasy: Microsoft David a Microsoft Zira , ako je uvedené nižšie.

hlas microsoft davis

hlas microsoft zira

Ak je vo vašom systéme nainštalovaný iba jeden hlas, musíte zmeniť text sapi.GetVoices.Item(1)(sapi.GetVoices.Item(1) ) na sapi.GetVoices.Item(0) , inak sa pri pokuse o spustenie skriptu zobrazí chybové hlásenie. Môžete tiež vytvoriť ďalší dokument programu Poznámkový blok(Notepad) a vložiť doň kód uvedený nižšie, ktorý vám povie, aké hlasy sú nainštalované. Uložte ho ako súbor .VBS, ako je znázornené vyššie, a spustite ho.

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

Doteraz sme na zadávanie textu používali toto kontextové dialógové okno, ale svoju správu môžete jednoducho napísať aj do súboru skriptu. To by bolo užitočné, ak by ste chceli potom naplánovať automatické spustenie skriptu. Je zrejmé, že sa to dá použiť na žartovanie vašich priateľov a rodiny a funguje to naozaj dobre.

Len si predstavte, že niekto zapne počítač a počuje, ako mu počítač hovorí: „ Ahoj John(Hello John) , som veľmi ospalý, prosím, dnes ma neobťažuj!“ keď sa naštartuje! Zo skúsenosti ti môžem sľúbiť, je to hysterické a určite to treba vyskúšať.

Ak chcete správu zakódovať napevno, jednoducho zmeňte posledný riadok na niečo takéto:

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

Naplánovať súbor skriptu

Teraz, keď ste napevno zakódovali svoju správu pre zamýšľaný cieľ, jednoducho ju musíte spustiť, keď chcete. Ak ste technicky zdatní, môžete použiť program ako AutoIt , ktorý vám umožní robiť extrémne veci, ako je spustenie súboru skriptu pri otvorení určitého programu alebo pri maximalizácii alebo minimalizácii okna.

Nemám čas sa tomu všetkému venovať v tomto príspevku, ale našťastie má spoločnosť Microsoft(Microsoft) vstavanú funkciu s názvom Plánovač úloh(Task Scheduler) , ktorá vám umožňuje ľahko robiť dosť komplikované veci so skriptami.

Môj predchádzajúci príspevok ide do hĺbky o tom, ako naplánovať spustenie súboru skriptu, keď sa v (how to schedule a script file to run)systéme Windows(Windows) vyskytnú určité udalosti . Ak máte nejaké problémy so spustením skriptu, neváhajte napísať komentár a ja sa pokúsim pomôcť. Užite si to!



About the author

Som webový vývojár s viac ako 10 ročnými skúsenosťami, z toho 8 rokov ako profesionálny softvérový inžinier. Mám tiež skúsenosti s vývojom mobilných aplikácií a hier pre stolné aj mobilné zariadenia. Vo voľnom čase rád hrám videohry a pozerám filmy, počúvam hudbu, čítam knihy a venujem sa záhradke.



Related posts