اجعـل حاسوبـك يقـرا مـا تكتـب | trick

من الخدع الرائعة التي يمكن ان تقوم بها على حاسوبك هي ان تجعله يقرا ما تكتب انت طبعا ليس باللغة العربية و لكن تستطيع ان تكتب له كلمات عربية باللغات  الاجنبية مثال على ذلك (مدونة = modawana) و هكذا وهذه الخدعة هي عبارة عن كود برمجي بلغة الباتش (Batch) يقوم باظهار سطر اوامر لادخال اي كلمات يقوم الحاسوب بتحويلها ال نص صوتي مباشرة.

و هذا هو الكود البرمجي:

Dim message, sapi
 message = InputBox("Text to Audio Converter"+vbcrlf+"Coded By Am!ne_G33K","Text to Audio Converter")
 Set sapi = CreateObject("sapi.spvoice")

 sapi.Speak message

كل ما عليك فعله هو ان تفتح التوت باد (notepad) او اي قارىء نصوص اخر و تقوم بالصاق الكود عليه و حفظة بامتداد (.vbs) او تحميلة مباشرة اسفل التدوينة.

و عند فتح الملف تظهر لك علبة سطر لادخال الكلمات باللغة الاجنبية :

رابط الملف:

تحميل