If-Koubou

Kā padarīt datoru runāt / runā, ko tu uzraksti

Kā padarīt datoru runāt / runā, ko tu uzraksti (Jautrība)

Windows ir atdzist funkcija, kas ļauj datoram runāt vai runāt, kā jūs to pastāstīsiet! Šī metode izmanto iebūvēto API, kas instalēta operētājsistēmās Windows XP, Vista, 7, 8 un 10, ko sauc par SAPI (runas lietojumprogrammu programmēšanas saskarne).

Microsoft runas API ir tas, ko izmanto Windows sistēmā iebūvētajai teksta-runas pieejamības funkcijai. Varat arī rakstīt programmas, kas izsauc API, kas ļautu jūsu lietojumprogrammām runāt, bet tas ir izstrādātājiem.

Vienkārši padarot datoru pateikt, ko vēlaties, patiesībā ir diezgan viegli! Šajā rakstā es parādīšu, kā izveidot VBS skriptu, kas no lietotāja ievadīs teksta ievadi, un tad runās. Es pieminīšu arī to, cik grūti ievadīt tekstu, kuru vēlaties runāt, un pēc tam ieplānojiet, ka šis skripts darbosies ar konkrētiem notikumiem, piemēram, sākot Windows vai atspējot izslēgšanu.

Ievades teksts, runājiet pa e-pastu

Sāksim ar vienkāršu skriptu, kurā parādīsies dialoglodziņš, kur jūs varat ievadīt to, ko Windows vēlaties runāt. Vispirms iet uz priekšu un atveriet Notepad.

1. solis: Ielīmējiet šādu tekstu jaunā dokumentā:

Dim ziņa, sapi
message = InputBox ("Ievadiet tekstu, kuru vēlaties runāt", "Runājiet šo")
Iestatīt sapi = CreateObject ("sapi.spvoice")
sapi.Speak ziņa

Ņemiet vērā, ka, kopējot tekstu no tīmekļa pārlūkprogrammas un ielīmējot to Notepad, citātus radīs problēmas. Pirms faila saglabāšanas jums jāpārlūko un jāizdzēš katra cena (") un vēlreiz ierakstiet cenu. Turpmākajā piemērā ir sešas pēdiņas. Tam vajadzētu būt kaut kas līdzīgs attēlam zemāk.

Tagad, kad jūs ejat, lai saglabātu failu, piešķiriet tam jebkādu nosaukumu, bet pārliecinieties, ka jūs arī ierakstiet .VBS pēc vārda. Tālāk, lai Saglabāt kā tipu kastē, izvēlieties Visi faili noklusējuma teksta dokumentu vietā.

Tagad veiciet dubultklikšķi uz VBS faila, un jums vajadzētu redzēt ievades lodziņu, kurā jūs varat ievadīt tekstu, kuru vēlaties runāt! Ierakstiet kaut ko un noklikšķiniet uz Labi.

Ja jūs visu darāt pareizi, jums vajadzētu dzirdēt vai nu vīriešu, vai sieviešu balsi izteikt savu teikumu. Ja jums rodas kāda veida kļūdas ziņojums, pārliecinieties, ka atkal ir jākopē un jāpielīmē teksts un jāmaina šīs cenas.

SAPI balss iestatījumu konfigurēšana

Tas ir jautri, taču mēs varam arī konfigurēt mazu runājošo datoru ar dažādiem iestatījumiem. Mēs varam mainīt skaļumu, cik ātri vai lēni balss sarunas un mainīt dzimumu starp vīriešiem un sievietēm. Šeit ir daži piemēra kodi, kur es pievienoju pāris papildu līnijas.

Dim ziņa, sapi
message = InputBox ("Ievadiet tekstu, kuru vēlaties runāt", "Runājiet šo")
Iestatīt sapi = CreateObject ("sapi.spvoice")
Iestatiet sapi.Voice = sapi.GetVoices.Item (1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak ziņa

Noklusējuma līmenis ir 0 un diapazons ir no -10 līdz 10. -10, balss runās ļoti lēni, un 10 runās ļoti ātri. Tilpums ir saistīts ar noklusējumu 100 un diapazons ir no 0 līdz 100. Līnija, kas sākas ar Iestatiet sapi.Voice ļaus jums mainīt citu balsi, ja tā ir instalēta jūsu sistēmā.

Ņemiet vērā, ka balsu skaits, no kuriem jūs varat izvēlēties, ir atkarīgs no operētājsistēmas. Windows 7 ir tikai viena balss, Microsoft Anna.

Windows 10 ir divas balsis: Microsoft David un Microsoft Zira, kā parādīts zemāk.

Ja jūsu sistēmā ir instalēta tikai viena balss, jums ir jāmaina tā sapi.GetVoices.Item (1) uz sapi.GetVoices.Item (0), pretējā gadījumā jūs mēģināsiet palaist skriptu, parādot kļūdas ziņojumu. Jūs varat arī izveidot citu Notepad dokumentu un ielīmēt zemāk esošo kodu, kas jums pateiks, kādas balsis ir instalētas. Saglabājiet to kā VBS failu, kā parādīts iepriekš, un palaidiet to.

Iestatiet VObj = CreateObject ("SAPI.SpVoice")
Par katru balsi VObj.getvoices
I = I + 1
msgbox "" & (I - 1) & "-" & Voice.GetDescription
Nākamais

Līdz šim mēs esam izmantojuši šo uznirstošo dialoglodziņu, lai ievadītu tekstu, taču jūs varat arī vienkārši ievadīt ziņu skripta failā. Tas būtu noderīgi, ja jūs vēlētos, lai pēc tam skriptu palaist automātiski. Protams, to var izmantot, lai palaistu draugus un ģimenes locekļus, un tas darbojas patiešām labi.

Iedomājieties, ka kāds, ieslēdzot datoru, dzirdot datoru, viņam pasakās: "Sveiks Džons, es esmu ļoti miegains, lūdzu, man šodien neuztraucieties!", Kad tas sākas! Es varu jums solīt no pieredzes, tas ir isterisks un jums noteikti vajadzētu izmēģināt.

Lai cietie kodi ziņu, vienkārši mainiet pēdējo rindiņu uz kaut ko līdzīgu:

sapi.Speak "Sveiks Džons, es šodien ļoti nogurusi!"

Schedule Script File

Tagad, kad esat cietā koda ziņu par jūsu paredzēto mērķi, jums vienkārši ir palaist to, kad vēlaties. Ja izmantojat tehnoloģiju, jūs varat izmantot tādu programmu kā AutoIt, kas ļaus jums izdarīt ārkārtīgi sarežģījumus, piemēram, palaist skripta failu, kad tiek atvērta konkrēta programma vai kad tiek maksimizēti vai minimizēti logi.

Man nav laika iekļūt šajā ziņā, bet par laimi Microsoft ir iebūvēta funkcija, ko sauc par uzdevumu plānotāju, kas ļauj ērti veikt dažas diezgan sarežģītas lietas ar skriptiem.

Mans iepriekšējais ziņojums padziļināti apraksta, kā ieplānot skripta failu palaišanu, kad sistēmā Windows tiek parādīti noteikti notikumi. Ja jums ir grūtības panākt, lai jūsu skripts darbotos, varat izlikt komentāru un mēģināt to palīdzēt. Izbaudi!