كيف تجعل حاسوبك يتكلم بكل ما تريد !

سوف تتعجب بعد قرائتك للعنوان, لكن ستتعجب أكثر عندما تقوم بجعل حاسوبك يتكلم وينطق أي شيئ تكتبه له. وأيضا ستتمكن من معرفة هل حاسوبك ذكر أم أنتى؟ هذا يعني جنس حاسوبك! وهاته الحيلة جد بسيطة.

أولا نحتاج الى صناعة وبرمجة برنامج يعمل على حاسوبنا ليحول لنا كل مانكتب الى كلام.

كيف تجعل حاسوبك يتكلم؟

لجعل حاسوبك يتكلم فأنت بحاجة الى صنع برنامج, لاتقلق ساقوم باعطائك كود البرنامج الذي سنقوم بنسخه في برنامج NotePad, ثم حفظ الملف بامتداد vbs. ثم نفتح البرنامج ونكتب ما نريد ونضغط على زر Enter. كما ترون حيلة سهلة فقط اتبع الشرح.

1- افتح برنامج NotePad

ابحث عن برنامج NotePad في حاسوبك فهو يكون منصب على جميع نسح الويندوز وقم بفتحه و ان لم تجده فاستخدم أي برنامج لتحرير النصوص.

2- أنسخ الكود اسفله وقم بنسجه في NotePad

Dim message, sapi
message=InputBox(“What do you want me to say?”,”Speak to Me”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

ملاحظة : رجاءا لاتقوم بتغيير أي شيء في الكود انسخه والصقه كما هو.

3- احفظ الملف بأي اسم تريد وبامتداد vbs

كما جاء في الصورة احفظ الكود بامتداد vbs وسميه ما تريد انا اسميته talk.vbs

4- شغل البرنامج واكتب اي شيء تريد من الحاسوب التكلم به

شغل البرنامج بالنقر عليه مرتين

الان سيقتح البرنامج وكل ماعليك فعله الان هو كتابة ماتريد واضغط على زر Ok. عندها سيتكل حاسوبك, اليس رائع! وعندها ستحدد جنس حاسوبك هل ذكر أم انتى.

وفي الاخير ات قمت بهاته الخطوات واستعملت البرنامج, شاركنا جنس حاسوبك هل ذكر أم أنثى