Există o funcție grozavă în Windows care vă permite să vă faceți computerul să vorbească sau să vorbească orice îi spuneți! Această metodă profită de un API încorporat instalat pe Windows XP, Vista, 7, 8 și 10 numit SAPI (Speech Application Programming Interface).
Microsoft Speech API este ceea ce este folosit pentru caracteristica de accesibilitate text-to-speech încorporată în Windows. De asemenea, puteți scrie programe care apelează API-ul, ceea ce v-ar permite să vă lăsați aplicațiile să vorbească, dar asta este pentru dezvoltatori.
Cuprins
- Introduceți text, rostiți mesajul
- Configurați setările de voce SAPI
- Program Script File
Este destul de ușor să-ți faci computerul să spună ceea ce vrei! În acest articol, vă voi arăta cum să creați un script VBS care va prelua o introducere de text de la un utilizator și apoi îl va rosti. De asemenea, voi menționa cum să codificați textul pe care doriți să îl rostiți și apoi să programați acel script să ruleze la anumite evenimente, cum ar fi pornirea Windows sau deconectarea.
Introduceți text, rostiți mesajul
Să începem cu un script simplu care va deschide o casetă de dialog în care puteți introduce ceea ce doriți să spună Windows. Mai întâi, mergeți mai departe și deschideți Notepad.
Pasul 1: Lipiți următorul text într-un document nou:
Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
Rețineți că atunci când copiați text din browserul dvs. web și îl lipiți în Notepad, ghilimele vor cauza probleme. Înainte de a salva fișierul, trebuie să parcurgeți și să ștergeți fiecare citat (") și să introduceți din nou citatul. În exemplul de mai jos, există șase citate. Ar trebui să arate ceva ca imaginea de mai jos.
Acum, când mergeți să salvați fișierul, dați-i orice nume, dar asigurați-vă că introduceți și .VBS după nume. Apoi, pentru caseta Salvare ca tip , alegeți Toate fișierele în loc de documentele text implicite.
Acum faceți dublu clic pe fișierul VBS și ar trebui să vedeți o casetă de introducere în care puteți introduce textul pe care doriți să îl rostiți! Tastați ceva și faceți clic pe OK.
Dacă ai făcut totul bine, ar trebui să auzi fie o voce masculină, fie o voce feminină rostind propoziția ta. Dacă primiți orice fel de mesaj de eroare, asigurați-vă că copiați și lipiți din nou textul și înlocuiți acele ghilimele.
Configurați setările de voce SAPI
Este distractiv, dar putem configura și micul nostru computer vorbitor cu diferite setări. Putem schimba volumul, cât de repede sau încet vorbește vocea și putem schimba genul între bărbat și femeie. Iată un exemplu de cod în care am adăugat câteva linii suplimentare.
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
Rata implicită este 0, iar intervalul este de la -10 la 10. -10 va face ca vocea să vorbească foarte încet și 10 va vorbi foarte repede. Volumul este implicit la 100 și intervalul este de la 0 la 100. Linia care începe cu Set sapi.Voice vă va permite să treceți la o altă voce, dacă este instalată pe sistemul dumneavoastră.
Rețineți că numărul de voci din care puteți alege depinde de sistemul de operare. În Windows 7, există o singură voce, Microsoft Anna.
În Windows 10, există două voci: Microsoft David și Microsoft Zira, așa cum se arată mai jos.
Dacă există o singură voce instalată pe sistemul dvs., trebuie să schimbați care spune sapi.GetVoices.Item(1) în sapi.GetVoices.Item(0) , altfel veți primi un mesaj de eroare când încercați să rulați scriptul. De asemenea, puteți crea un alt document Notepad și lipiți codul de mai jos, care vă va spune ce voci sunt instalate. Salvați-l ca fișier .VBS așa cum se arată mai sus și rulați-l.
Set VObj = CreateObject(“SAPI.SpVoice”)
For Each Voice In VObj.getvoices
I = I + 1
msgbox “” & (I – 1) & ” – ” & Voice.GetDescription
Next
Până acum, am folosit acest dialog pop-up pentru a introduce text, dar ați putea, de asemenea, să introduceți pur și simplu mesajul dvs. în fișierul script. Acest lucru ar fi util dacă doriți să programați apoi scriptul să ruleze automat. Evident, acest lucru poate fi folosit pentru a face glume prietenilor și familiei și funcționează foarte bine.
Imaginați-vă că cineva își pornește computerul și aude computerul spunându-i „Bună John, mi-e foarte somn, vă rog să nu mă deranjați astăzi!” când pornește! Vă promit din experiență, este isteric și cu siguranță ar trebui să îl încercați.
Pentru a codifica mesajul, pur și simplu schimbați ultima linie în ceva de genul acesta:
sapi.Speak “Hello John, I am very tired today!”
Program Script File
Acum că ați codificat mesajul pentru ținta dorită, trebuie pur și simplu să-l rulați când doriți. Dacă sunteți pasionat de tehnologie, puteți utiliza un program precum AutoIt , care vă va permite să faceți lucruri extreme, cum ar fi să rulați fișierul script atunci când un anumit program este deschis sau când o fereastră este maximizată sau minimizată.
Nu am timp să intru în toate acestea în această postare, dar, din fericire, Microsoft are o funcție încorporată numită Task Scheduler, care vă permite să faceți cu ușurință niște lucruri destul de complicate cu scripturi.
Postarea mea anterioară descrie în profunzime cum să programez un fișier script să ruleze atunci când apar anumite evenimente în Windows. Dacă întâmpinați probleme cu scriptul să funcționeze, nu ezitați să postați un comentariu și voi încerca să vă ajut. Bucurați-vă!