هناك ميزة رائعة في Windows تتيح لك جعل جهاز الكمبيوتر الخاص بك يتحدث أو يتكلم^{(computer talk or speak)} ما تقوله! تستفيد هذه الطريقة من واجهة برمجة تطبيقات^(API) مدمجة مثبتة على أنظمة التشغيل Windows XP^{(Windows XP)} و Vista و 7 و 8 و 10 تسمى SAPI ( واجهة برمجة تطبيقات الكلام^{(Speech Application Programming Interface)} ).

Microsoft Speech API هو ما يتم استخدامه لميزة إمكانية الوصول لتحويل^{(accessibility feature)} النص إلى كلام  المضمنة في Windows . يمكنك أيضًا كتابة برامج تستدعي API ، مما يسمح لك بالسماح لتطبيقاتك بالتحدث ، ولكن هذا للمطورين.

مجرد جعل جهاز الكمبيوتر الخاص بك يقول ما تريد هو أمر سهل للغاية في الواقع! في هذه المقالة ، سأوضح لك كيفية إنشاء برنامج نصي VBS^{(VBS script)} يأخذ إدخالاً نصيًا^{(text input)} من المستخدم ثم نطقه. سأذكر أيضًا كيفية كتابة التعليمات البرمجية الثابتة للنص الذي تريد نطقه ثم جدولة هذا البرنامج النصي ليتم تشغيله في أحداث معينة مثل بدء تشغيل Windows^(Windows) أو تسجيل الخروج.

نص الإدخال ، نطق الرسالة

لنبدأ بنص بسيط سينبثق مربع حوار^{(dialog box)} حيث يمكنك كتابة ما تريد أن يتحدث به Windows. أولاً^(First) ، انطلق وافتح برنامج " المفكرة^(Notepad) " .

الخطوة 1:^{(Step 1:)}  الصق النص التالي في مستند جديد:

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

لاحظ أنه عند نسخ نص من مستعرض الويب الخاص بك ولصقه^{(web browser and paste)} في برنامج Notepad ، فإن علامات الاقتباس ستتسبب في حدوث مشكلات. قبل حفظ الملف ، تحتاج إلى متابعة وحذف كل اقتباس (") وإعادة كتابة الاقتباس. في المثال أدناه ، هناك ستة اقتباسات. يجب أن تبدو مثل الصورة أدناه^{(image below)} .

الآن عندما تذهب لحفظ الملف ، أعطه أي اسم ، ولكن تأكد من كتابة .VBS أيضًا بعد الاسم. بعد ذلك ، بالنسبة إلى المربع حفظ بنوع^{( Save as type)} ، اختر كل الملفات بدلاً من ^{( All files)}المستندات النصية^{(Text Documents)} الافتراضية .

الآن انقر نقرًا مزدوجًا فوق ملف VBS^{(VBS file)} وسترى مربع إدخال^{(input box)} حيث يمكنك كتابة النص الذي تريد نطقه! اكتب شيئًا^{(Type something)} وانقر فوق "موافق".

إذا فعلت كل شيء بشكل صحيح^{(everything right)} ، يجب أن تسمع صوتًا ذكوريًا أو أنثويًا يتحدث بجملتك. إذا تلقيت أي نوع من رسائل الخطأ^{(error message)} ، فتأكد من نسخ النص ولصقه مرة أخرى واستبدال علامات الاقتباس هذه.

تكوين إعدادات SAPI Voice

هذا ممتع ، ولكن يمكننا أيضًا تكوين جهاز الكمبيوتر الصغير الناطق لدينا بإعدادات مختلفة. يمكننا تغيير مستوى الصوت ومدى سرعة أو إبطاء المحادثات الصوتية وتغيير الجنس بين الذكر والأنثى. إليك بعض الأمثلة على الكود^{(example code)} حيث أضفت سطرين إضافيين.

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
Set sapi.Voice = sapi.GetVoices.Item(1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak message

المعدل الافتراضي^{(default rate)} هو 0 والنطاق من -10 إلى 10. -10 سيتحدث الصوت ببطء شديد و 10 سيتحدث بسرعة فائقة. تم ضبط مستوى الصوت افتراضيًا على 100 والنطاق من 0 إلى 100. سيسمح لك السطر الذي يبدأ بـ Set sapi.Voice بالتغيير إلى صوت آخر ، إذا كان مثبتًا على نظامك.

لاحظ أن عدد الأصوات التي يمكنك الاختيار من بينها يعتمد على نظام التشغيل^{(operating system)} . في Windows 7 ، يوجد صوت واحد فقط ، Microsoft Anna .

في Windows 10 ، يوجد صوتان: Microsoft David و Microsoft Zira^{(Microsoft David and Microsoft Zira)} كما هو موضح أدناه.

إذا كان هناك صوت واحد مثبت على نظامك ، فعليك تغيير ذلك المسمى sapi.GetVoices.Item (1)^{(sapi.GetVoices.Item(1) )} إلى sapi.GetVoices.Item (0) ، وإلا فستتلقى رسالة خطأ^{(error message)} عند محاولة تشغيل البرنامج النصي. يمكنك أيضًا إنشاء مستند Notepad آخر ولصق^{(Notepad document and paste)} الكود أدناه ، والذي سيخبرك بالأصوات المثبتة. احفظه كملف .VBS كما هو موضح أعلاه وقم بتشغيله.

Set VObj = CreateObject(“SAPI.SpVoice”)
For Each Voice In VObj.getvoices
I = I + 1
msgbox “” & (I – 1) & ” – ” & Voice.GetDescription
Next

حتى الآن ، كنا نستخدم مربع الحوار المنبثق^{(popup dialog)} هذا لإدخال نص ، ولكن يمكنك أيضًا كتابة رسالتك في ملف البرنامج النصي^{(script file)} . سيكون هذا مفيدًا إذا أردت جدولة البرنامج النصي ليتم تشغيله تلقائيًا. من الواضح أنه يمكن استخدام هذا لمزحة أصدقائك وعائلتك وهو يعمل بشكل جيد حقًا.

فقط تخيل أن شخصًا ما يشغل جهاز الكمبيوتر الخاص به ويسمع الكمبيوتر يقول له " مرحبًا جون^{(Hello John)} ، أنا نعسان جدًا ، من فضلك لا تزعجني اليوم!" عندما يبدأ! يمكنني أن أعدك من التجربة ، إنها حالة هستيرية ويجب عليك بالتأكيد تجربتها.

من أجل ترميز الرسالة ، ما عليك سوى تغيير السطر الأخير إلى شيء مثل هذا:

sapi.Speak “Hello John, I am very tired today!”

جدولة ملف البرنامج النصي

الآن بعد أن قمت بترميز رسالتك بشكل ثابت للهدف المقصود ، عليك ببساطة تشغيلها عندما تريد. إذا كنت خبيرًا في التكنولوجيا ، فيمكنك استخدام برنامج مثل AutoIt ، والذي سيتيح لك القيام بأشياء متطرفة مثل تشغيل ملف البرنامج النصي^{(script file)} الخاص بك عند فتح برنامج معين أو عند تكبير النوافذ أو تصغيرها.

ليس لدي وقت للدخول في كل ذلك في هذا المنشور ، ولكن لحسن الحظ تمتلك Microsoft ميزة مضمنة تسمى Task Scheduler تتيح لك القيام ببعض الأشياء المعقدة جدًا باستخدام البرامج النصية بسهولة.

تتناول رسالتي السابقة بالتفصيل كيفية جدولة ملف نصي^{(script file)} ليتم تشغيله عند حدوث أحداث معينة في Windows . إذا كنت تواجه أي مشكلة في تشغيل البرنامج النصي ، فلا تتردد في نشر تعليق وسأحاول مساعدتك. استمتع!

How to Make Your Computer Talk/Speak What You Type

There is cool feature in Windows that allows you to make your computer tаlk or speak whatever you tell it! This method takes advantage of a built-in API installed on Windows XP, Vista, 7, 8 and 10 called SΑPI (Spеech Application Programming Interface).

The Microsoft Speech API is what is used for the text-to-speech accessibility feature built into Windows. You can also write programs that call the API, which would allow you to let your applications speak, but that’s for developers.

Just making your computer say what you want is pretty easy actually! In this article, I’ll show you how to create a VBS script that will take a text input from a user and then speak it. I’ll also mention how to hard code the text you want spoken and then schedule that script to run on specific events like starting Windows or logging off.

Input Text, Speak Message

Let’s start off with a simple script that will popup a dialog box where you can type in what you want Windows to speak. First, go ahead and open Notepad.

Step 1: Paste the following text into a new document:

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

Note that when you copy text from your web browser and paste it into Notepad, the quotes will cause problems. Before you save the file, you need to go through and delete each quote (“) and retype the quote. In the example below, there are six quotes. It should look something like the image below.

Now when you go to save the file, give it any name, but make sure you also type .VBS after the name. Next, for the Save as type box, choose All files instead of the default Text Documents.

Now double-click on the VBS file and you should see an input box where you can type in the text you want spoken! Type something and click OK.

If you did everything right, you should hear either a male or female voice speak out your sentence. If you get any kind of error message, make sure to copy and paste the text again and replace those quotes.

Configure SAPI Voice Settings

This is fun, but we can also configure our little talking computer with different settings. We can change the volume, how fast or slow the voice talks and change the gender between male and female. Here is some example code where I added a couple of extra lines.

Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
Set sapi.Voice = sapi.GetVoices.Item(1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak message

The default rate is 0 and the range is -10 to 10. -10 will have the voice speak super slowly and 10 will speak super fast. The volume is defaulted at 100 and the range is 0 to 100. The line that starts with Set sapi.Voice will allow you to change to another voice, if installed on your system.

Note that the number of voices you can choose from depends on the operating system. In Windows 7, there is only one voice, Microsoft Anna.

In Windows 10, there are two voices: Microsoft David and Microsoft Zira as shown below.

If there is only one voice installed on your system, you have to change that says sapi.GetVoices.Item(1) to sapi.GetVoices.Item(0), otherwise you will get an error message when you try to run the script. You can also create another Notepad document and paste the code below in, which will tell you what voices are installed. Save it as a .VBS file like shown above and run it.

Set VObj = CreateObject(“SAPI.SpVoice”)
For Each Voice In VObj.getvoices
I = I + 1
msgbox “” & (I – 1) & ” – ” & Voice.GetDescription
Next

Up until now, we have been using this popup dialog to enter text, but you could also simply type your message into the script file. This would be useful if you wanted to then schedule the script to run automatically. Obviously, this can be used to prank your friends and family and it works really well.

Just imagine someone turning on their computer and hearing the computer tell them “Hello John, I’m very sleepy, please don’t bother me today!” when it boots up! I can promise you from experience, it’s hysterical and you should definitely try it.

In order to hardcode the message, simply change the last line to something like this:

sapi.Speak “Hello John, I am very tired today!”

Schedule Script File

Now that you have hardcoded your message for your intended target, you simply have to run it when you want. If you are tech-savvy, you could use a program like AutoIt, which will allow you to do extreme stuff like run your script file when a certain program is opened or when a windows is maximized or minimized.

I don’t have time to get into all that in this post, but luckily Microsoft has a built-in feature called the Task Scheduler that lets you do some pretty complicated stuff with scripts easily.

My previous post goes in depth on how to schedule a script file to run when certain events occur in Windows. If you have any trouble getting your script to work, feel free to post a comment and I’ll try to help. Enjoy!

Related posts

• كيف تحول الكمبيوتر القديم إلى آلة أركيد

• ماذا yeet Mean and How لاستخدامها بشكل صحيح

• كيفية الذهاب Live على TikTok

• كيفية تكوين صداقات عبر الإنترنت

• ما هو Twitter Fleet ولماذا Would تستخدمه؟

• أفضل فئات Netflix Secret Codes List إلى Unlock Hidden

• 9 Best Pokemon Go Tips and Tricks

• Got A Promotion Recently؟ مبروك، الآن أضفها إلى LinkedIn

• كيفية إضافة أصدقاء على Discord

• 5 أفضل Netflix Original Anime يمكنك تيار الآن

• كيفية التطوع ل Political Campaign Online

• أفضل 10 العروض والأفلام على Hulu لووتش الآن [تحديث - 2021]

• ما هي Snapchat Stickers and How لإنشاءها

• 8 Best Forgotten TV Shows على YouTube

• ما هي Twitter Spaces and Should التي تستخدمها لهم؟

• 11 أفضل Netflix Original Series and Movies لمشاهدة الآن

• ما هي الفتيات الإلكترونية و E-boys؟ فهم Internet Subculture

• فيما يلي Subredits 50 Best على Reddit Broken باهتمام

• 7 أفضل Netflix Hacks and Codes

• 3 Ways لإضافة Andy Warhol Pop Art Effect إلى الصور