POKER



امروزه با وجود Cortanaیا ابزارهای مشابه، صحبت کردن کامپیوترها چیز عجیب و غریبی به نظر نمی رسد. اما زمانی که نسخههای اولیه از سیستم عامل ویندوز تاره منتشر شده بود، خواندن یک عبارت یا متن توسط ویندوز موضوع شگفت انگیزی محسوب می شد. شما می توانید دوباره آن دوران را زنده کنید. ابتدا یک داکیومنتNotepadرا باز کنید، سپس کد زیر را در آن قرار دهید:


 


Dim Message, Speak
(“Message=InputBox(“Enter text”,”Speak
(“Set Speak=CreateObject(“sapi.spvoice
Speak.Speak Message


آن را با نام POKER.vbs ذخیره نمایید. البته باز هم نام فایل می تواند هر چه که می خواهید باشد. فقط اطمینان حاصل کنید که پسوند آن .vbs است. حال بر روی فایل دوبار کلیک کنید و متنی را که قصد دارید توسط کامپیوتر خوانده شود وارد نمایید.

شگفت زده می شوید وقتی کامپیوتر شما آن متن را می خواند!!

  • :-) POKER

ارسال نظر

تنها امکان ارسال نظر خصوصی وجود دارد
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی
نظر شما به هیچ وجه امکان عمومی شدن در قسمت نظرات را ندارد، و تنها راه پاسخگویی به آن نیز از طریق پست الکترونیک می‌باشد. بنابراین در صورتیکه مایل به دریافت پاسخ هستید، پست الکترونیک خود را وارد کنید.