Inteligentne maszyny zdolne do porozumiewania się są często materiałem futurystycznych filmów science-fiction, ale możesz zmienić dowolny komputer w rozmowny Cathy. Mimo że nie jesteśmy jeszcze na etapie tworzenia komputerów, na których mogą oni komunikować się z nami jak ludzie, istnieje kilka narzędzi i prostych skryptów, które możemy napisać, aby każdy komputer z systemem Windows do nas przemówił.
W 1988 r. Pojawiła się pierwsza iteracja VBScript lub (Visual Basic Scripting Edition) i wciąż była to bardzo prymitywna wersja tego, co mamy dzisiaj. Z biegiem lat, potrzeba łatwego w użyciu i lekkiego języka skryptowego dla Microsoft wzrosła. Z tego powodu firma kontynuowała pracę nad nią i ostatecznie opublikowała ją w 1996 roku.
Jest to prosty skrypt wykorzystujący COM (Component Object Model) do tworzenia, odczytywania, aktualizowania i usuwania plików w systemach operacyjnych Microsoft. Od czasu wydania Windows 98 został zainstalowany na każdym komputerze. Jest wysoce uniwersalny, ponieważ środowisko hosta VBScript może być osadzone w programach za pomocą Microsoft Script Control. Często używa się go w Internetowych usługach informacyjnych, Hostach skryptów systemu Windows i Internet Explorer.
Ale to wystarczająca ilość technicznego bełkotu. Zróbmy to i nauczmy się, jak sprawić, by twój komputer mówił!
Tworzenie wizualnego skryptu podstawowego jest bardzo proste i nie wymaga żadnych specjalnych programów. Chociaż istnieją programy, których można używać do pisania bardziej zaawansowanych skryptów, większość programistów i osób, które zajmują się pisaniem skryptów, używają Notatnika Microsoft.
Rozpocznijmy proces od otwarcia Notatnika. Po otwarciu Notatnika wystarczy, że wpiszesz poniższy kod lub po prostu skopiujesz go i wkleisz w oknie notatnika. Aby zmienić to, co twój skrypt sprawia, że komputer mówi, po prostu zastąp fragment, który mówi: "Geekowie odziedziczą ziemię" z czymkolwiek, co chcesz usłyszeć.
dim speechobject set speechobject = createobject ("sapi.spvoice") speechobject.speak "Geekowie odziedziczą ziemię" 
Po pomyślnym wprowadzeniu tekstu, który chcesz usłyszeć, po prostu naciśnij "Plik" i kliknij opcję "Zapisz jako ...".
Znajdź miejsce, w którym chcesz zapisać obraz. W tym przykładzie zapisuję go do pustego folderu w katalogu Pobrane. Ważną rzeczą, którą musisz zrobić, to nadać mu nazwę, która kończy się na .vbs. To powie komputerowi, że nie zapisujesz pliku tekstowego; raczej, zapisujesz VBScript. Nazwimy tę próbkę "Geek test.vbs", jak pokazano poniżej.
Teraz możesz iść dalej i zamknąć notatnik i przejść do folderu, w którym zapisałeś skrypt VBScript. Zauważysz, że ikona nie jest normalną ikoną TXT. Jest to mały niebieski napis na białym tle. Kliknij dwukrotnie tę ikonę, aby uruchomić skrypt jednorazowego użytku i wysłuchać swojego tekstu. Gratulacje, właśnie stworzyłeś swój pierwszy skrypt.
Teraz, aby się o tym przekonać, spróbuj stworzyć jeszcze kilka skryptów z dowolnym tekstem, który chcesz usłyszeć. Możesz też kliknąć prawym przyciskiem myszy na VBScript i wybrać opcję "Otwórz za pomocą ...", a następnie wybrać notatnik, aby edytować tekst w tym samym pliku.
Teraz, kiedy już wiesz, jak napisać scenariusz jednorazowego użytku i prawdopodobnie grałeś z nim kilka razy, możesz się trochę nudzić. Właśnie dlatego zamierzamy podnieść poprzeczkę.
Następną rzeczą, jaką nauczymy się, jest stworzenie skryptu, który jest nieco bardziej zaawansowany niż skrypt jednorazowego użytku. Spowoduje to utworzenie okna dialogowego, w którym można wpisać tekst i odesłać go do komputera.
Zacznij od ponownego otwarcia notatnika i wprowadzenia tego skryptu lub skopiowania i wklejenia go do okna notatnika.
Wiadomość przyciemniona, wiadomość sapi = InputBox ("Co mam powiedzieć, twoja głupota?", "Mówię za ciebie.") Ustaw sapi = CreateObject ("sapi.spvoice") sapi.Speak wiadomość 
Po wprowadzeniu kodu wystarczy zapisać plik jako "Text to Speech.vbs", jak pokazano wcześniej, aby sfinalizować skrypt. Po zapisaniu przejdź do miejsca, w którym się znajduje i kliknij dwukrotnie. Zauważysz, że okno nazywa się "mówię dla ciebie", a prośba o wpisanie tekstu, który ma być wokalizowany, brzmi: "Co powiem, twoja geekiness?" Zawsze możesz zmienić te słowa, by powiedzieć cokolwiek chcesz.
Na razie wpiszmy "Geekowie odziedziczą ziemię", a następnie naciśnij przycisk "OK", aby uruchomić skrypt i usłyszeć głos na głos.
Jest to całkiem zabawne, ale twój komputer nadal nie jest z Tobą w bardzo dużym stopniu. Teraz spróbujemy innego prostego skryptu, który uwzględni porę dnia, a także odpowiednią odpowiedź na porę dnia. Ten skrypt odczytuje czas twojego komputera i na tej podstawie przywita Cię w określony sposób.
Zacznij od otwarcia notatnika i wstawienia tego krótkiego skryptu. Możesz zamienić sekcję z pozdrowieniami danego dnia na dowolną frazę, którą chcesz usłyszeć, a także zastąpić Geekmeister własnym imieniem.
Ustaw Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str jeśli godzina (czas) 12 to jeśli godzina (czas)> 16 to Sapi.speak "Dobry wieczór Geekmeister" inaczej Sapi.speak "Dobre popołudnie Geekmeister" koniec, jeśli koniec jeśli koniec, jeśli 
Teraz możesz zapisać dokument tekstowy jako plik VBS. Gdy to zrobisz, przejdź do folderu, w którym jest zapisany i kliknij go dwukrotnie. Na podstawie czasu pokazywanego przez komputer, albo powie "Dzień dobry, dzień dobry, albo dobry wieczór Geekmeister".
Skrypt mówi, że jeśli zegar odczytuje cokolwiek przed 12, jest poranek, a cokolwiek po 12 jest po południu; jednak ma również klauzulę, która mówi, że nawet jeśli jest po 12, tak długo, jak czas upływa o 16:00 (16), staje się wieczorem.
Jeśli chcesz trochę bardziej zaawansowany i otrzymać czas, możesz utworzyć nowy notatnik i wprowadzić ten skrypt.
Skrypt może wyglądać skomplikowanie, ale zasadniczo mówi komputerowi, co ma powiedzieć i jak to powiedzieć na podstawie czasu pokazywanego na zegarze komputera. Zawsze możesz zastąpić "Obecny czas" dowolnym wprowadzeniem na czas, który chcesz.
Ustaw Sapi = Wscript.CreateObject ("SAPI.SpVoice") Sapi.speak "Obecny czas to"jeśli godzina (czas)> 12 to Sapi.speak godzina (czas) -12 jeśli godzina (czas) = 0 to Sapi.speak "12" w innym Sapi.speak godzina (czas) koniec jeśli koniec jeślijeśli minuta (czas) <10 to Sapi.speak "o" jeśli minuta (czas) <1 to Sapi.speak "zegar" inaczej Sapi.speak minuta (czas) kończy się, jeśli jeszcze Sapi.speak minuta (czas) się kończy, jeślijeśli godzina (czas)> 12 to Sapi.speak "P.M." jeśli godzina (czas) = 0, to jeśli minuta (czas) = 0 to Sapi.speak "Północ" inaczej Sapi.speak "A.M." zakończ jeśli jeszcze, jeśli godzina (czas) = 12 to jeśli minuta (czas) = 0 to Sapi.speak "Noon" inaczej Sapi.speak "P.M." Koniec, jeśli jeszcze Sapi.speak "A.M." koniec, jeśli koniec, jeśli koniec, jeśli
Teraz wystarczy zapisać plik jako skrypt VBScript, tak jak w poprzednich krokach, a następnie przejść do tego folderu. Jeśli wszystko poszło dobrze, powinieneś być w stanie dwukrotnie kliknąć i usłyszeć, jak komputer informuje Cię o czasie.
Teraz, gdy wiesz, jak sprawić, by Twój komputer Cię pozdrowił i poinformował Cię o czasie, jak fajnie byłoby, gdyby komputer zrobił to po włączeniu komputera. W rzeczywistości jest to bardzo proste, jeśli połączysz te dwa skrypty i umieścisz je we właściwym miejscu.
Zacznij od otwarcia notatnika Microsoft i skopiowania tego kodu do okna. Jest to po prostu kopia obu kodów połączona z tobą. Pamiętaj, że możesz zmienić powitanie na "Co słychać, Witaj Mistrzu, Pozdrawiaj swoją wszechmocną wysokość" lub cokolwiek chcesz, żeby twój komputer powiedział ci.
Ustaw Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str jeśli godzina (czas) 12 to jeśli godzina (czas)> 16 to Sapi.speak "Dobry wieczór Geekmeister" inaczej Sapi.speak "Dobre popołudnie Geekmeister" koniec, jeśli koniec jeśli koniec, jeśli Sapi.speak "Obecny czas to"jeśli godzina (czas)> 12 to Sapi.speak godzina (czas) -12 jeśli godzina (czas) = 0 to Sapi.speak "12" w innym Sapi.speak godzina (czas) koniec jeśli koniec jeślijeśli minuta (czas) <10 to Sapi.speak "o" jeśli minuta (czas) <1 to Sapi.speak "zegar" inaczej Sapi.speak minuta (czas) kończy się, jeśli jeszcze Sapi.speak minuta (czas) się kończy, jeślijeśli godzina (czas)> 12 to Sapi.speak "P.M." jeśli godzina (czas) = 0, to jeśli minuta (czas) = 0 to Sapi.speak "Północ" inaczej Sapi.speak "A.M." zakończ jeśli jeszcze, jeśli godzina (czas) = 12 to jeśli minuta (czas) = 0 to Sapi.speak "Noon" inaczej Sapi.speak "P.M." Koniec, jeśli jeszcze Sapi.speak "A.M." koniec, jeśli koniec, jeśli koniec, jeśli
Po skopiowaniu całego kodu dokładnie tak, jak jest, do notatnika, zapisuj go jako "Startup greeting.vbs". Można go nazwać dowolnie, ale dla celów tej demonstracji łatwiej jest, gdy wszyscy jesteśmy na tej samej stronie. Teraz, gdy został zapisany, możesz dwukrotnie kliknąć plik VBScript, aby usłyszeć, że Cię witają i powiedzieć Ci godzinę.
Jeśli chcesz, aby gra była odtwarzana po włączeniu komputera, np. Jarvis z Iron Man, po prostu wybierz plik i przeciągnij go myszką w dół do "przycisku Start". Bez zwalniania myszy przenieś na "Wszystkie programy", a następnie znajdź folder "Startup" i zwolnij przycisk myszy.
Jeśli z jakiegoś powodu nie działa to dla ciebie, możesz również ręcznie przejść do folderu startowego. Najpierw przejdź do folderu, w którym zapisano "Startup greeting.vbs" i skopiuj go.
Następnym krokiem jest wpisanie następującej ścieżki w górnej części dowolnego okna Eksploratora i wciśnięcie "Enter". Wystarczy zmienić USERNAME pod nazwą, której używasz na swoim koncie komputerowym.
C: \ Users \ USERNAME \ AppData \ Roaming \ Microsoft \
Windows \ Menu Start \ Programy \ Uruchomienie
Gdy jesteś w folderze startowym, po prostu wklej plik vbs i jesteś gotowy. Teraz, gdy następnym razem uruchomisz komputer i zalogujesz się, powinien on automatycznie Cię pozdrowić i poinformować o tym, która jest godzina.
Jeśli masz problemy z utworzeniem któregoś ze skryptów, możesz je pobrać za pomocą tych linków.