Stupid Geek Tricks Πώς να κάνετε τον υπολογιστή σας να σας μιλήσει

Ευφυείς μηχανές ικανές να μιλούν συχνά είναι το υλικό των φουτουριστικών ταινιών sci-fi, αλλά μπορείτε να μετατρέψετε οποιονδήποτε υπολογιστή σε ένα chatty Cathy. Παρόλο που δεν είμαστε ακόμα στη σκηνή με υπολογιστές όπου μπορούν να αλληλεπιδρούν μαζί μας όπως οι άνθρωποι, υπάρχουν μερικά εργαλεία και απλά σενάρια που μπορούμε να γράψουμε για να μας μιλήσουν οποιοσδήποτε υπολογιστής που χρησιμοποιεί Windows.

Μια μικρή (οπτική) βασική ιστορία

Το 1988, εμφανίστηκε η πρώτη επανάληψη του VBScript ή (Visual Basic Scripting Edition) και εξακολουθούσε να είναι μια πολύ πρωτόγονη έκδοση αυτού που έχουμε σήμερα. Με τα χρόνια, η ανάγκη για μια εύκολη στη χρήση και ελαφριά γλώσσα δέσμης ενεργειών για τη Microsoft αυξήθηκε. Εξαιτίας αυτού, η εταιρεία συνέχισε να ασχολείται με αυτήν και τελικά την κυκλοφόρησε στο κοινό το 1996.

Πρόκειται για ένα απλό σενάριο που χρησιμοποιεί COM (Component Object Model) για τη δημιουργία, ανάγνωση, ενημέρωση και διαγραφή αρχείων στα λειτουργικά συστήματα της Microsoft. Από την κυκλοφορία των Windows 98, έχει εγκατασταθεί με κάθε υπολογιστή. Είναι πολύ ευέλικτο λόγω του γεγονότος ότι το περιβάλλον υποδοχής VBScript μπορεί να ενσωματωθεί μέσα στα προγράμματα που χρησιμοποιούν το Microsoft Script Control. Χρησιμοποιείται συχνά με Internet Information Services, Windows Script Host και Internet Explorer.

Αλλά, αυτό είναι αρκετό από το τεχνικό jabber jabber. Ας πάμε κάτω σε αυτό και να μάθουμε πώς να κάνει ο υπολογιστής σας να μιλήσει!

Ενιαία χρήση VBScripts

Η δημιουργία ενός βασικού σεναρίου είναι πολύ εύκολη και δεν απαιτεί ειδικά προγράμματα. Παρόλο που υπάρχουν προγράμματα που μπορείτε να χρησιμοποιήσετε για να γράψετε πιο προηγμένα σενάρια, οι περισσότεροι προγραμματιστές και οι άνθρωποι που κάνουν το γράψιμο scripts απλά χρησιμοποιούν το Σημειωματάριο της Microsoft.

Ας ξεκινήσουμε τη διαδικασία ανοίγοντας το Notepad. Αφού ανοίξετε το Σημειωματάριο, το μόνο που χρειάζεται να κάνετε είναι να πληκτρολογήσετε τον παρακάτω κώδικα ή απλά να το αντιγράψετε και να τον επικολλήσετε στο παράθυρο του σημειωματάριου. Για να αλλάξετε τι λέει το σενάριό σας ο υπολογιστής, απλά αντικαταστήστε την ενότητα που λέει "Οι geeks θα κληρονομήσουν τη γη" με ό, τι θέλετε να ακούσετε.

αδύνατο speechobject σύνολο speechobject = createobject ("sapi.spvoice") speechobject.speak "Οι geeks θα κληρονομήσουν τη γη"

Αφού εισάγετε με επιτυχία το κείμενο που θέλετε να ακούσετε, απλά πατήστε "Αρχείο" και κάντε κλικ στην επιλογή "Αποθήκευση ως ...".

Βρείτε ένα μέρος όπου θέλετε να αποθηκεύσετε την εικόνα. Για αυτό το παράδειγμα, την αποθηκεύω σε ένα κενό φάκελο στον κατάλογο Downloads. Το σημαντικό πράγμα που πρέπει να κάνετε είναι να του δώσετε ένα όνομα που τελειώνει με .vbs. Αυτό θα πει στον υπολογιστή ότι δεν αποθηκεύετε ένα αρχείο απλού κειμένου. μάλλον, αποθηκεύετε ένα VBScript. Θα ονομάσουμε αυτό το δείγμα "Geek test.vbs" όπως φαίνεται παρακάτω.

Τώρα μπορείτε να προχωρήσετε και να κλείσετε το σημειωματάριο και να μεταβείτε στο φάκελο στον οποίο αποθηκεύσατε το VBScript. Θα παρατηρήσετε ότι το εικονίδιο δεν είναι το κανονικό εικονίδιο TXT. Πρόκειται για ένα μικρό μπλε κύλινδρο σε λευκό φόντο. Κάντε διπλό κλικ σε αυτό το εικονίδιο για να ξεκινήσετε το σενάριο μιας χρήσης και να ακούσετε το κείμενό σας. Συγχαρητήρια, μόλις δημιουργήσατε το πρώτο σας σενάριο.

Τώρα, για να το κρεμάσετε, προσπαθήστε να δημιουργήσετε μερικά ακόμη σενάρια με οποιοδήποτε κείμενο θέλετε να ακούσετε. Εναλλακτικά, μπορείτε να κάνετε δεξί κλικ στο VBScript και να επιλέξετε την επιλογή "Άνοιγμα με ...", στη συνέχεια επιλέξτε σημειωματάριο για να επεξεργαστείτε το κείμενο μέσα στο ίδιο αρχείο.

Σενάριο κειμένου σε ομιλία

Τώρα που ξέρετε πώς να γράψετε ένα σενάριο μιας χρήσης και πιθανότατα έχετε παίξει με αυτό μερικές φορές, μπορεί να σας βαρεθεί λίγο. Αυτός είναι ο λόγος για τον οποίο θα το κλωτσάσουμε.

Το επόμενο πράγμα που θα μάθουμε είναι πώς να δημιουργήσουμε ένα σενάριο που είναι λίγο πιο προηγμένο από το σενάριο μιας χρήσης. Αυτό θα δημιουργήσει ένα παράθυρο διαλόγου στο οποίο μπορείτε να πληκτρολογήσετε κείμενο και να το διαβάσετε ξανά από τον υπολογιστή σας.

Ξεκινήστε ανοίγοντας ξανά το σημειωματάριό σας και εισάγοντας αυτό το σενάριο ή αντιγράφοντας και επικολλώντας το στο σημειωματάριο.

 Μήνυμα Dim, sapi message = InputBox ("Τι να πω, το Geekness σας;", "Μιλώ για σένα") Ορισμός sapi = CreateObject ("sapi.spvoice") sapi.Speak μήνυμα

Μετά την εισαγωγή του κώδικα, απλά αποθηκεύστε το αρχείο ως "Text to Speech.vbs" όπως φαίνεται παραπάνω για να οριστικοποιήσετε τη δέσμη ενεργειών. Αφού αποθηκευτεί, μεταβείτε στη θέση όπου βρίσκεται και κάντε διπλό κλικ σε αυτήν. Θα παρατηρήσετε ότι το παράθυρο ονομάζεται "Εγώ μιλώ για σένα" και η προτροπή για να εισαγάγετε κείμενο που πρέπει να φωνητιστεί είναι "Τι να πω, σας Geekiness;" Μπορείτε πάντα να αλλάξετε αυτά για να πει οτιδήποτε θέλετε.

Προς το παρόν, ας εισαγάγουμε "Οι geeks θα κληρονομούν τη γη" και στη συνέχεια πατήστε το κουμπί "OK" για να εκτελέσετε το σενάριο και να ακούσετε το κείμενο σας δυνατά.

Χαιρετισμοί VBScript Script

Αυτό γίνεται αρκετά διασκεδαστικό, αλλά ο υπολογιστής σας εξακολουθεί να μην αλληλεπιδρά πολύ μαζί σας. Τώρα θα δοκιμάσουμε ένα άλλο απλό σενάριο που θα λαμβάνει υπόψη την ώρα της ημέρας καθώς και την κατάλληλη απάντηση για την ώρα της ημέρας. Αυτό το σενάριο θα διαβάσει το χρόνο του υπολογιστή σας και, με βάση αυτό, θα σας χαιρετήσει με ένα συγκεκριμένο τρόπο.

Ξεκινήστε ανοίγοντας το σημειωματάριό σας και εισάγοντας αυτό το μικρό σενάριο. Μπορείτε να αντικαταστήσετε την ενότητα που έχει τα χαιρετισμούς της ημέρας με οποιαδήποτε φράση θέλετε να ακούσετε καθώς και να αντικαταστήσετε το Geekmeister με το όνομά σας.

Ορίστε Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str εάν η ώρα (ώρα) 12 τότε αν ώρα (χρόνος)> 16 τότε Sapi.speak "Καλησπέρα Geekmeister" άλλος Sapi.speak "Καλό το απόγευμα Geekmeister" αν τελειώσει εάν

Τώρα μπορείτε να αποθηκεύσετε το έγγραφο κειμένου ως αρχείο VBS. Μόλις το κάνετε, πηγαίνετε στο φάκελο όπου αποθηκεύεται και κάντε διπλό κλικ πάνω του. Με βάση την ώρα που δείχνει ο υπολογιστής σας, θα πει είτε "Καλημέρα, καλό απόγευμα ή καλό βράδυ Geekmeister."

Το σενάριο λέει ότι αν το ρολόι διαβάσει τίποτα πριν από 12, είναι πρωί, και ότι οτιδήποτε μετά από 12 είναι απόγευμα? Ωστόσο, έχει επίσης μια ρήτρα που λέει ότι ακόμα και αν είναι μετά από 12, όσο ο χρόνος είναι πέρα ​​από τις 16:00 (4 μ.μ.) γίνεται το βράδυ.

Στιγμιότυπο VBScript της ώρας της ημέρας

Εάν θέλετε να πάρετε λίγο πιο προηγμένο και να λάβετε το χρόνο, μπορείτε να δημιουργήσετε ένα νέο σημειωματάριο και να εισάγετε αυτό το σενάριο.

Το σενάριο μπορεί να φαίνεται περίπλοκο, αλλά ουσιαστικά λέει στον υπολογιστή σας τι να πει και πώς να το λέει με βάση την ώρα που εμφανίζεται στο ρολόι του υπολογιστή σας. Μπορείτε πάντα να αντικαταστήσετε το "Η τρέχουσα ώρα είναι" με οποιαδήποτε εισαγωγή για το χρόνο που θέλετε.

Ορίστε Sapi = Wscript.CreateObject ("SAPI.SpVoice") Sapi.speak "Η τρέχουσα ώρα είναι"

αν ώρα (χρόνος)> 12 τότε Sapi.speak ώρα (ώρα) -12 άλλο αν ώρα (χρόνος) = 0 τότε Sapi.speak "12" άλλο Sapi.speak ώρα (ώρα)

αν το λεπτό (χρόνος) < 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

εάν ώρα (χρόνος)> 12 τότε Sapi.speak "P.M." αλλιώς αν η ώρα (ώρα) = 0 τότε αν το λεπτό (χρόνος) = 0 τότε το Sapi.speak "Midnight" άλλο Sapi.speak "A.M." end αν αλλιώς εάν ώρα (χρόνος) = 12 τότε αν λεπτό (χρόνος) = 0 τότε Sapi.speak "μεσημέρι" άλλο Sapi.speak "P.M." τέλος αν αλλιώς Sapi.speak "A.M." end αν τελειώσει αν τελειώσει αν

Τώρα απλά πρέπει να αποθηκεύσετε το αρχείο ως VBScript όπως κάνατε στα προηγούμενα βήματα και στη συνέχεια να πλοηγηθείτε σε αυτόν το φάκελο. Εάν όλα πάνε καλά, θα πρέπει να μπορείτε να κάνετε διπλό κλικ σε αυτό και να ακούσετε τον υπολογιστή να σας λέει την ώρα.

Ένα χαιρετισμό εκκίνησης

Τώρα που γνωρίζετε πώς να κάνετε τον υπολογιστή σας να σας χαιρετήσει και να σας πω την ώρα, πόσο θα ήταν ο υπολογιστής να το κάνει όταν ενεργοποιείτε τον υπολογιστή. Είναι πραγματικά πολύ εύκολο να το κάνετε αν συνδυάσετε μόνο τα δύο σενάρια και τα βάζετε στη σωστή θέση.

Ξεκινήστε ανοίγοντας το σημειωματάριο της Microsoft και αντιγράφοντας αυτόν τον κώδικα στο παράθυρο. Είναι απλά ένα αντίγραφο και των δύο κωδικών που συνδυάζονται για εσάς. Θυμηθείτε ότι μπορείτε να αλλάξετε το χαιρετισμό στο "Τι είναι ο τύπος, Γεια σας κύριε, Χαιρετάτε την παντοδύναμη Υψηλότητα σας", ή οτιδήποτε θέλετε να σας πει ο υπολογιστής σας.

Ορίστε Sapi = Wscript.CreateObject ("SAPI.SpVoice") dim str εάν η ώρα (ώρα) 12 τότε αν ώρα (χρόνος)> 16 τότε Sapi.speak "Καλησπέρα Geekmeister" άλλος Sapi.speak "Καλό το απόγευμα Geekmeister" αν τελειώσει εάν Sapi.speak "Η τρέχουσα ώρα είναι"

αν ώρα (χρόνος)> 12 τότε Sapi.speak ώρα (ώρα) -12 άλλο αν ώρα (χρόνος) = 0 τότε Sapi.speak "12" άλλο Sapi.speak ώρα (ώρα)

αν το λεπτό (χρόνος) < 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

εάν ώρα (χρόνος)> 12 τότε Sapi.speak "P.M." αλλιώς αν η ώρα (ώρα) = 0 τότε αν το λεπτό (χρόνος) = 0 τότε το Sapi.speak "Midnight" άλλο Sapi.speak "A.M." end αν αλλιώς εάν ώρα (χρόνος) = 12 τότε αν λεπτό (χρόνος) = 0 τότε Sapi.speak "μεσημέρι" άλλο Sapi.speak "P.M." τέλος αν αλλιώς Sapi.speak "A.M." end αν τελειώσει αν τελειώσει αν

Αφού αντιγράψετε ολόκληρο τον κώδικα ακριβώς όπως είναι, στο σημειωματάριο, προχωρήστε και αποθηκεύστε το ως "Startup greeting.vbs". Μπορεί επίσης να ονομάζεται οτιδήποτε θέλετε, αλλά για τους σκοπούς αυτής της επίδειξης, είναι ευκολότερο να είμαστε όλοι στην ίδια σελίδα. Τώρα που έχει αποθηκευτεί, μπορείτε να κάνετε διπλό κλικ στο αρχείο VBScript για να το ακούσετε να σας χαιρετά και να σας πω την ώρα.

Εάν θέλετε να αναπαράγεται όταν ενεργοποιείτε τον υπολογιστή σας, όπως ο Jarvis από το Iron Man, απλά επιλέξτε το αρχείο και σύρετέ το με το ποντίκι σας προς τα κάτω στο κουμπί "Έναρξη". Χωρίς να απελευθερώσετε το ποντίκι, μετακινήστε το στο "Όλα τα προγράμματα" το φάκελο "Εκκίνηση" και αφήστε το κουμπί του ποντικιού.

Αν, για κάποιο λόγο αυτό δεν λειτουργεί για εσάς, μπορείτε επίσης να μεταβείτε με μη αυτόματο τρόπο στο φάκελο εκκίνησης. Θα μεταβείτε πρώτα στο φάκελο όπου αποθηκεύεται το "Startup greeting.vbs" και αντιγράψτε το.
Το επόμενο βήμα είναι να πληκτρολογήσετε την ακόλουθη διαδρομή στην κορυφή κάθε παραθύρου του Explorer και πατήστε "Enter". Θα χρειαστεί να αλλάξετε το USERNAME με το όνομα που χρησιμοποιείτε για τον λογαριασμό του υπολογιστή σας.

C: \ Χρήστες \ USERNAME \ AppData \ Περιαγωγή \ Microsoft \
Windows \ Start Menu \ Programs \ Startup

Μόλις είστε στο φάκελο εκκίνησης, απλά επικολλήστε το αρχείο VBS και είστε καλό να πάτε. Τώρα, την επόμενη φορά που θα ξεκινήσετε τον υπολογιστή σας και θα συνδεθείτε, θα πρέπει αυτόματα να σας χαιρετήσει και να σας ενημερώσει για την ώρα που είναι.

Εάν είχατε κάποιο πρόβλημα να δημιουργήσετε κάποιο από τα σενάρια, είναι ελεύθερα να τα κατεβάσετε χρησιμοποιώντας αυτούς τους συνδέσμους.

1. Geek Test
2. Χαιρετισμός
3. Ένα χαιρετισμό εκκίνησης
4. Λέξη χρόνου
5. Κείμενο σε ομιλία