Stupid Geek gudrybės Kaip padaryti, kad kompiuteris kalbėtų su jumis

Pažangios kalbos, kurios gali kalbėti, dažnai yra futuristinių sci-fi filmų dalykas, bet jūs galite paversti bet kurį kompiuterį į chatty Cathy. Nors mes dar nežinome kompiuterių, kuriuose jie gali bendrauti su mumis, kaip žmonės, yra keletas įrankių ir paprastų scenarijų, kuriuos galime rašyti, kad bet kuris kompiuteris, kuriame veikia „Windows“, kalba su mumis.

Maža (vizualinė) pagrindinė istorija

1988 m. Pasirodė pirmasis VBScript arba (Visual Basic Scripting Edition) kartojimas, kuris vis dar buvo labai primityvus šiandienos variantas. Per metus „Microsoft“ paprasta naudoti ir lengva skriptų kalba. Dėl šios priežasties bendrovė toliau dirbo su juo ir 1996 m.

Tai paprastas scenarijus, kuriame „COM“ („Component Object Model“) naudojamas „Microsoft“ operacinių sistemų failams kurti, skaityti, atnaujinti ir ištrinti. Kadangi „Windows 98“ buvo paleista, ji buvo įdiegta su kiekvienu kompiuteriu. Jis yra labai universalus dėl to, kad VBScript priimančioji aplinka gali būti įtraukta į programas, kuriose naudojama „Microsoft Script Control“. Jis dažnai naudojamas su interneto informacijos paslaugomis, „Windows Script Host“ ir „Internet Explorer“.

Bet tai pakankamai techninio banglentininko. Paimkime į jį ir sužinokite, kaip kalbėti kompiuteriu!

Vienkartinio naudojimo VBScripts

Vaizdo pagrindinio scenarijaus kūrimas yra labai paprastas ir nereikalauja jokių specialių programų. Nors yra programų, kuriomis galite rašyti daugiau pažangių scenarijų, dauguma programuotojų ir žmonių, kurie rašo scenarijus, naudoja tik „Microsoft“ užrašų knygelę.

Pradėkime procesą atidarydami Notepad. Atidarę „Notepad“ viską, ką reikia padaryti, įveskite šį kodą arba tiesiog nukopijuokite ir įklijuokite jį į notepad langą. Kad pakeistumėte savo scenarijaus kompiuterį, tiesiog pakeiskite skyrių, kuriame sakoma: „Geekai paveldės žemę“ su tuo, ką norite išgirsti.

dim voiceobject set voiceobject = createobject ("sapi.spvoice") voiceobject.speak "Geeks paveldės žemę"

Sėkmingai įvesdami tekstą, kurį norite išgirsti, tiesiog paspauskite „Failas“ ir spustelėkite parinktį „Išsaugoti kaip…“.

Raskite vietą, kurioje norite išsaugoti vaizdą. Šiuo pavyzdžiu jį įrašau į tuščią aplanką atsisiuntimų kataloge. Svarbus dalykas, kurį reikia padaryti, yra suteikti jam pavadinimą, kuris baigiasi .vbs. Tai pasakys kompiuteriui, kad neišsaugojote paprasto teksto failo; greičiau įrašote VBScript. Šį pavyzdį pavadinsime „Geek test.vbs“, kaip parodyta žemiau.

Dabar galite eiti į priekį ir uždaryti užrašų knygelę ir pereiti prie aplanko, kuriame išsaugojote „VBScript“. Pastebėsite, kad piktograma nėra įprastinė TXT piktograma. Tai mažas mėlynas slinkimas ant baltos fono. Dukart spustelėkite šią piktogramą, kad paleistumėte vienkartinio naudojimo scenarijų ir klausytumėte teksto. Sveikiname, ką tik sukūrėte pirmąjį scenarijų.

Dabar, norėdami jį pakabinti, pabandykite sukurti keletą scenarijų su bet kuriuo tekstu, kurį norite išgirsti. Arba galite dešiniuoju pelės klavišu spustelėti „VBScript“ ir pasirinkti parinktį „Atidaryti su…“, tada pasirinkite notepad, kad redaguotumėte tą patį failą.

Tekstas į kalbą

Dabar, kai žinote, kaip parašyti vienkartinio naudojimo scenarijų ir galbūt kelis kartus grojo su juo, gali būti šiek tiek nuobodu. Štai kodėl mes ketiname nubėgti.

Kitas dalykas, kurį išmoksime, yra tai, kaip sukurti scenarijų, kuris yra šiek tiek pažangesnis nei vienkartinio naudojimo scenarijus. Taip bus sukurtas dialogo langas, kurį galite įvesti į kompiuterį ir jį perskaityti.

Pradėkite dar kartą atverdami savo užrašų knygelę ir įvesdami šį scenarijų arba nukopijuodami ir įklijuodami jį į notepad langą.

 Dim žinutė, sapi message = InputBox („Ką aš turiu pasakyti, tavo geekumas?“, „Aš kalbu už jus.“) Nustatyti sapi = CreateObject („sapi.spvoice“) sapi.Speak message

Įvedus kodą, tiesiog įrašykite failą kaip „Tekstas į Speech.vbs“, kaip parodyta anksčiau, kad užbaigtumėte scenarijų. Kai jis bus išsaugotas, eikite į vietą, kurioje jis yra, ir dukart spustelėkite jį. Jūs pastebėsite, kad langas vadinamas „Aš kalbu už jus.“, O raginimas įvesti tekstą, kurį reikia vokalizuoti, yra „Ką aš turiu pasakyti, tavo geekiškumą?“ Visada galite juos pakeisti ir pasakyti, ko norite.

Dabar įvesime „Geeksas paveldės žemę“, tada paspauskite „OK“ mygtuką, kad paleistumėte scenarijų ir išgirsti tekstą garsiai.

Sveikinimai VBScript Script

Tai tampa gana smagu, bet jūsų kompiuteris su jumis vis dar nesikeičia. Dabar išbandysime kitą paprastą scenarijų, kuriame atsižvelgiama į dienos laiką, taip pat į atitinkamą atsakymą dėl dienos laiko. Šis scenarijus skaitys jūsų kompiuterio laiką ir, remiantis tuo, jis jus sveikins tam tikru būdu.

Pradėkite atidarydami savo užrašų knygą ir įterpdami šį trumpą scenarijų. Galite pakeisti skyrių, kuriame yra dienos sveikinimai, su bet kuria išraiška, kurią norite išgirsti, taip pat pakeisti Geekmeister savo vardu.

Nustatykite Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str, jei valandą (laiką) 12, tada, jei valandą (laiką)> 16, tada Sapi.speak "Geras vakaras Geekmeister" kitas Sapi.speak "Good afternoon Geekmeister" pabaiga, jei baigiasi jei baigiasi, jei

Dabar galite išsaugoti tekstinį dokumentą kaip VBS failą. Kai tai padarysite, eikite į aplanką, kuriame jis yra išsaugotas, ir dukart spustelėkite jį. Atsižvelgiant į laiką, kurį rodo jūsų kompiuteris, jis pasakys „Geras rytas, gera popietė arba geras vakaras Geekmeister“.

Scenarijus sako, kad jei laikrodis nieko skaito prieš 12, tai ryte, ir kad po 12-ojo yra kažkas po pietų; tačiau ji taip pat turi sąlygą, kuri sako, net jei po 12 metų, kol laikas yra praėjus 16:00 (16 val.), jis tampa vakaru.

Dienų laikas „VBScript“ scenarijus

Jei norite gauti šiek tiek daugiau pažengusių ir gauti laiką, galite sukurti naują užrašų knygą ir įvesti šį scenarijų.

Scenarijus gali atrodyti sudėtingas, tačiau iš esmės pasakoja kompiuteriui, ką pasakyti ir kaip tai pasakyti, atsižvelgiant į laiką, kuris rodomas jūsų kompiuterio laikrodyje. Jūs visada galite pakeisti „Dabartinį laiką“ su bet kokiu įvedimu, kiek norite.

Nustatyti Sapi = Wscript.CreateObject ("SAPI.SpVoice") Sapi.speak "Dabartinis laikas yra"

jei valandą (laiką)> 12, tada Sapi.speak valandą (laiką) -12 dar, jei valanda (laikas) = ​​0, tada Sapi.speak "12", dar Sapi.speak valandą (laiką), jei baigiasi, jei baigiasi

jei minutė (laikas) < 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

jei valanda (laikas)> 12, tada Sapi.speak "P.M." kitaip, jei valanda (laikas) = ​​0, tada, jei minutė (laikas) = ​​0, tada „Sapi.speak“ „Midnight“ dar kitas Sapi.speak „A.M.“ pabaiga, jei kitaip, jei valanda (laikas) = ​​12, tada, jei minutė (laikas) = ​​0, tada Sapi.speak "Noon" dar kitas Sapi.speak "P.M." pabaiga, jei kitaip Sapi.speak "A.M." pabaiga, jei pabaiga, jei baigiasi

Dabar tiesiog reikia išsaugoti failą kaip VBScript, kaip darėte ankstesniuose veiksmuose, ir tada pereikite prie šio aplanko. Jei viskas vyko gerai, jums turėtų būti suteikta galimybė dukart spustelėti ir išgirsti kompiuterio laiką.

„Startup Greeting“

Dabar, kai žinote, kaip padaryti jūsų kompiuterį sveikinančiu ir pasakyti, kiek vėsioje būtų, jei kompiuteris tai padarys, kai įjungsite kompiuterį. Iš tikrųjų labai lengva padaryti, jei tiesiog sujungiate du scenarijus ir įdėjote juos į tinkamą vietą.

Pradėkite atidarydami „Microsoft“ užrašų knygelę ir kopijuodami šį kodą į langą. Tai paprasčiausiai abiejų kodų kopija. Atminkite, kad galite pakeisti pasveikinimą į „Kas yra dude, Hello Master, Sveikiname visagalis aukščiausią aukštį“, ar ką norite, kad jūsų kompiuteris jums pasakytų.

Nustatykite Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str, jei valandą (laiką) 12, tada, jei valandą (laiką)> 16, tada Sapi.speak "Geras vakaras Geekmeister" kitas Sapi.speak "Good afternoon Geekmeister" pabaiga, jei baigiasi jei baigiasi, jei Sapi.speak "Dabartinis laikas"

jei valandą (laiką)> 12, tada Sapi.speak valandą (laiką) -12 dar, jei valanda (laikas) = ​​0, tada Sapi.speak "12", dar Sapi.speak valandą (laiką), jei baigiasi, jei baigiasi

jei minutė (laikas) < 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

jei valanda (laikas)> 12, tada Sapi.speak "P.M." kitaip, jei valanda (laikas) = ​​0, tada, jei minutė (laikas) = ​​0, tada „Sapi.speak“ „Midnight“ dar kitas Sapi.speak „A.M.“ pabaiga, jei kitaip, jei valanda (laikas) = ​​12, tada, jei minutė (laikas) = ​​0, tada Sapi.speak "Noon" dar kitas Sapi.speak "P.M." pabaiga, jei kitaip Sapi.speak "A.M." pabaiga, jei pabaiga, jei baigiasi

Kai kopijuojate visą šį kodą lygiai taip, kaip jis yra, į užrašų knygelę, eikite į priekį ir išsaugokite jį kaip „Startup greeting.vbs“. Jis taip pat gali būti vadinamas viskas, ko norite, tačiau šio demonstravimo tikslais lengviau, jei visi esame tame pačiame puslapyje. Dabar, kai jis išsaugotas, galite du kartus spustelėti „VBScript“ failą, kad išgirstumėte, jog jis pasveikins jus ir pasakys jums laiką.

Jei norite, kad jis būtų žaidžiamas, kai įjungiate kompiuterį, pvz., „Jarvis“ iš „Iron Man“, tiesiog pasirinkite failą ir vilkite jį su pele žemyn į „Pradžios mygtuką“. Neišleidžiant pelės, perkelkite jį į „Visos programos“, tada raskite „Startup“ aplanką ir atleiskite pelės mygtuką.

Jei dėl kokių nors priežasčių tai neveikia, taip pat galite rankiniu būdu pereiti prie paleisties aplanko. Pirmiausia eikite į aplanką, kuriame išsaugotas „Startup greeting.vbs“, ir nukopijuokite jį.
Kitas žingsnis yra įvesti šį kelią į bet kurio „Explorer“ lango viršų ir paspauskite „Enter“. Jums tereikia pakeisti USERNAME su vardu, kurį naudojate kompiuterio paskyroje.

C: Vartotojai USERNAME „Appata“ tarptinklinis ryšys „Microsoft“
Windows Pradžios meniu Programos Paleidimas

Kai esate aplanke paleisties pradžioje, tiesiog įklijuokite VBS failą ir esate gerai eiti. Dabar, kai kitą kartą paleisite kompiuterį ir prisijungsite, jis turėtų automatiškai pasveikinti jus ir informuoti jus apie tai, kiek laiko jis yra.

Jei kilo kokių nors problemų kuriant bet kurį scenarijų, jie gali laisvai atsisiųsti juos naudodami šias nuorodas.

1. Geek testas
2. Sveikinimas
3. „Startup Greeting“
4. Pasakojimo laikas
5. Iš rašto į kalbą