ويندوز

كيف تجعل Windows يقول الساعة بصوت عالٍ عندما تمر كل ساعة!

عندما نندمج بشكل كامل في عمل الكمبيوتر ، فإننا نضيع الكثير من الوقت دون أن ندرك ذلك ، والسبب المباشر لإضاعة الوقت هو تلك العناصر التي تفقد التركيز من مواقع التواصل الاجتماعي إلى تطبيقات المراسلة مثل WhatsApp وغيرها ، وبعضها مثير للاهتمام العناوين الرئيسية لإلهاءات أخرى ، لذلك ناقشنا سابقًا بالنسبة لمقال “الحيل والنصائح لزيادة الإنتاجية عند استخدام Windows 10” ، في هذه الحالة لم تعمل الساعة على شريط المهام في الجزء السفلي من الشاشة ، ولم تكن موجودة على سطح المكتب مفيد جدًا ، ما نحتاجه هو هذا الصوت العالي الذي يخبرنا ويستيقظ على مدار الساعة الآن ، ربما يعمل مكون الصوت بشكل أكثر كفاءة من المكون المرئي هذه المرة.

كيف تجعل Windows يتحدث؟ 🙃

كالعادة ، هناك نقطة لصالح macOS ، وهي أكثر ثباتًا وجمالًا من Windows والتي تضم العديد من الميزات الرائعة ، خاصة في أحدث إصدار من نظامها “Mojave”. هذه الميزة التي نتحدث عنها اليوم تم تضمينها فيها لفترة طويلة! على عكس نظام Windows المؤسف بعض الشيء ، والذي يتم تحميله فقط مع الخدمات التي تعمل عند بدء التشغيل لإبطاء النظام ، لا أحد ينكر وجود العديد من التطبيقات والميزات الجميلة المستوحاة من Linux و Mac ربما ، ولكن لا يزال هناك الكثير من الخدمات البسيطة التي يجب أن تكون متكاملة بطريقة ما لحسن الحظ ، يمكنك إضافة الميزة لجعل Windows يتحدث على مدار الساعة بمفرده في بضع دقائق ببضع نقرات.

اقرأ أيضًا: أفضل 50 أمرًا من أوامر Windows يجب أن يعرفها الجميع

اتبع الخطوات أدناه للقيام بذلك

1. افتح برنامج “المفكرة” أو أي محرر نصوص آخر والصق النص البرمجي التالي:

Dim speaks, speech
hour_now=hour(time)
if hour_now > 12 or hour_now = 12 Then
hour12 = hour_now - 12
ampm = "PM"
Else
hour12 = hour_now
hourfinal = hour_now
ampm = "AM"
End If
If hour12 = 10 Then
hourfinal = "Ten"
Elseif hour12 = 11 Then
hourfinal = "Eleven"
Elseif hour12 = 12 Then
hourfinal = "Twelve"
Elseif hour12 = 0 Then
hourfinal = "Twelve"
Elseif hour12 > 0 and hour12 < 10 Then
hourfinal = hour12
End If
speaks = "It is " & hourfinal & " o clock " & ampm
Set speech=CreateObject("sapi.spvoice")
speech.Speak speaks

2. قم بحفظ الملف في مكان مناسب على سطح المكتب في البداية قم بتسمية الملف “TimeAnnounce” ، ولكن تأكد من أنه ينتهي بامتداد نصي (.vbs) Visual Basic.

3. اكتب “Task Scheduler” في البحث واضغط على Enter لفتحه. من شريط القائمة ، انقر على “إجراء” ومن القائمة المنسدلة ، حدد “إنشاء مهمة” أو مباشرة من الواجهة الرئيسية إجراءات> إنشاء مهمة.

اقرأ أيضًا: كيفية تجميع نوافذ البرامج المفتوحة في نافذة واحدة في Windows

5. في النافذة المنبثقة ، في جدول الاسم ، أدخل اسمًا لمهمة إعلان الوقت ، على سبيل المثال ، وفي جدول الوصف ، يمكنك إدخال وصف للمهمة وترك باقي الإعدادات كما في الصورة أعلاه.

6. انتقل إلى قسم “المشغلات” التالي وانقر فوق الزر “جديد” ، وتأكد من تحديد “مرة واحدة” بجوار “ابدأ” ، وحدد تاريخ اليوم في حالتنا تاريخ اليوم 11.05.2018 وحدد البدء في المرة القادمة ، على سبيل المثال ، إذا كانت الساعة 10:37 ، فحدد 11:00:00 ، في حالتي الآن الساعة 12:39 ، هذا يعني أنني سأضع الساعة التالية عند الساعة 13 ، كما هو موضح في الصورة أعلاه ، لصق حدد المربع ✔ “كرر المهمة لكل منهما – كرر المهمة لكل منهما” وحدد “ساعة واحدة” من القائمة المنسدلة المجاورة لها ، ومن خيار “المدة” حدد “إلى أجل غير مسمى” واضغط على “موافق”.

اقرأ أيضًا: 5 تعديلات يمكنك القيام بها في التسجيل لتحسين نظام Windows 10

7. انتقل إلى علامة التبويب “الإجراءات” وانقر فوق “جديد” ، ثم انقر فوق “استعراض” بجوار مربع النص البرمجي وابحث عن ملف VBS الذي أنشأناه سابقًا ووضعه على سطح المكتب ، وانقر فوق “موافق” لإنشاء المهمة ، وسوف سماع صوت افتراضي لتحويل النص إلى كلام تقريبًا الوقت الذي تنقضي فيه كل ساعة.

أضف تعليق

انقر هنا لإضافة تعليق