Kā padarīt jūsu datoru sarunāties / runāt, ko rakstāt
Sistēmā Windows ir atdzist iezīme, kas ļauj datoram runāt vai runāt neatkarīgi no tā, ko jūs to sakāt! Šī metode izmanto iebūvēto API, kas instalēta sistēmā Windows XP, Vista, 7, 8 un 10, ko sauc par SAPI (runas lietojumprogrammu saskarne).
Microsoft runas API ir tas, ko izmanto, lai piekļūtu funkcijai Windows-runā pieejamā teksta-runas pieejamības funkcija. Varat arī rakstīt programmas, kas sauc par API, kas ļaus jums ļaut lietotnēm runāt, bet tas ir izstrādātājiem.
Tikai padarot datoru par to, ko vēlaties, ir diezgan vienkārši! Šajā rakstā es jums parādīšu, kā izveidot VBS skriptu, kas uzņems teksta ievadi no lietotāja un pēc tam runās. Es arī pieminēšu, kā kodēt tekstu, kuru vēlaties runāt, un pēc tam ieplānojiet šo skriptu, lai palaistu konkrētus notikumus, piemēram, Windows startēšanu vai izslēgšanu.
Ievades teksts, runas ziņojums
Sāksim ar vienkāršu skriptu, kas parādīs dialoglodziņu, kurā varat ievadīt to, ko vēlaties, lai Windows runātu. Pirmkārt, dodieties uz priekšu un atveriet Notepad.
1. darbība: Ielīmējiet šādu tekstu jaunā dokumentā:
Dim ziņa, sapi
message = InputBox (“Ievadiet runājamo tekstu”, “Runājiet to”)
Iestatīt sapi = CreateObject (“sapi.spvoice”)
sapi.Speak ziņojums
Ņemiet vērā, ka, kopējot tekstu no tīmekļa pārlūkprogrammas un ielīmējot to piezīmjdatorā, citāti radīs problēmas. Pirms faila saglabāšanas jums ir jāiziet un jāizdzēš katrs citāts (“) un jāpārraksta citāts. Turpmākajā piemērā ir sešas pēdiņas. Tam vajadzētu izskatīties līdzīgi zemāk redzamajam attēlam.
Tagad, kad dodaties, lai saglabātu failu, piešķiriet tai jebkādu nosaukumu, bet pārliecinieties, ka arī ierakstāt .VBS pēc nosaukuma. Tālāk, lai Saglabāt kā tipu lodziņā 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ā varat ievadīt tekstu, kuru vēlaties runāt! Ierakstiet kaut ko un noklikšķiniet uz Labi.
Ja jūs darījāt visu pareizi, jums vajadzētu dzirdēt vai nu vīriešu, vai sieviešu balss, kas izrunā jūsu teikumu. Ja saņemat jebkāda veida kļūdas ziņojumu, pārliecinieties, ka kopējat un ielīmējiet tekstu vēlreiz, un nomainiet tās.
Konfigurējiet SAPI balss iestatījumus
Tas ir jautri, bet mēs varam arī konfigurēt mūsu mazo runājošo datoru ar dažādiem iestatījumiem. Mēs varam mainīt apjomu, cik ātri vai lēni balss sarunas un mainīt dzimumu starp vīriešiem un sievietēm. Šeit ir kāds piemērs, kur es pievienoju pāris papildu rindas.
Dim ziņa, sapi
message = InputBox (“Ievadiet runājamo tekstu”, “Runājiet to”)
Iestatīt sapi = CreateObject (“sapi.spvoice”)
Iestatiet sapi.Voice = sapi.GetVoices.Item (1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak ziņojums
Noklusējuma likme ir 0, un diapazons ir no -10 līdz 10. -10 būs balss runāt super lēni un 10 runās super ātri. Skaļums ir noklusēts 100 un diapazons ir no 0 līdz 100. Līnija, kas sākas ar Iestatiet sapi.Voice ļaus jums pārslēgties uz citu balsi, ja tā ir instalēta jūsu sistēmā.
Ņemiet vērā, ka to balsu skaits, kuras var izvēlēties, ir atkarīgs no operētājsistēmas. Sistēmā Windows 7 ir tikai viena balss, Microsoft Anna.
Operētājsistēmā 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, tas ir jāmaina sapi.GetVoices.Item (1) uz sapi.GetVoices.Item (0), citādi jūs saņemsiet kļūdas ziņojumu, mēģinot palaist skriptu. 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 palaist to.
Iestatīt VObj = CreateObject (“SAPI.SpVoice”)
Par katru balss VObj.getvoices
I = I + 1
msgbox “” & (I - 1) & ”-” & Voice.GetDescription
Nākamais
Līdz šim mēs esam izmantojuši šo uznirstošo dialogu, lai ievadītu tekstu, bet jūs varat vienkārši ierakstīt savu ziņojumu skripta failā. Tas būtu noderīgi, ja vēlaties, lai skripts tiktu plānots automātiski. Protams, to var izmantot, lai palaidītu savus draugus un ģimeni, un tas darbojas ļoti labi.
Iedomājieties, ka kāds ieslēdz savu datoru un dzirdējis datoru, pastāstiet viņiem: „Labdien, es esmu ļoti miegains, lūdzu, nekautrējieties mani šodien!”, Kad tas sākas! Es varu jums apsolīt no pieredzes, tas ir histērisks, un jums noteikti vajadzētu to izmēģināt.
Lai ziņu varētu kodēt, vienkārši nomainiet pēdējo rindu uz šādu:
sapi.Speak “Hello John, šodien esmu ļoti noguris!”
Kalendāra skripta fails
Tagad, kad esat nosūtījis ziņu savam paredzētajam mērķim, jums vienkārši jādarbojas, kad vēlaties. Ja esat tehnoloģiski gudrs, jūs varētu izmantot programmu, piemēram, AutoIt, kas ļaus jums veikt ārkārtas sīkumus, piemēram, palaist skripta failu, kad tiek atvērta konkrēta programma vai kad logi ir maksimāli palielināti vai samazināti.
Man nav laika, lai nokļūtu šajā amatā, bet par laimi Microsoft ir iebūvēta funkcija, ko sauc par uzdevumu plānotāju, kas ļauj jums veikt diezgan sarežģītas lietas ar skriptiem.
Mana iepriekšējā ziņa padziļināti apraksta, kā plānot skripta failu, lai palaistu to, kad Windows notiek konkrēti notikumi. Ja jums rodas problēmas, kas saistītas ar jūsu skripta darbību, lūdzu, ievietojiet komentāru un mēģināšu palīdzēt. Izbaudi!
