کامپیوتر شما زن است یا مرد

کامپیوتر شما زن است یا مرد

1-     برنامه زیر را  کپی کنید

2-      آنرا به یک صفحه  در Notepad  انتقال دهید

3-     سپس آنرا تحت نامTalkit.vbs  ضبط کنید .

4-     حالا با کلیک کردن به فایل ضبط شده یک پنجره باز می شود که  می توانید جملاتی را با حروف لاتین در آن بنویسد.

5-     پس از نوشتن کلمات، صدای خواندن کلمات را توسط کامپیوتر خود خواهید شنید.

    اگر صدای شنیده شده مردانه بود، کامپیوتر شما مرد است و اگر صدای زنانه شنیدید کامپیوتر شما زن است.

کامپیوتر من که مرد بود، مال شما چطور؟! :)

msgbox ("Made by irantriz.ir!")

do

set wshshell=wscript.createobject ("wscript.shell")

strInput = InputBox("Type Bellow, To Hear It Spoken!", "text to talk")

If strInput = False Then
WScript.quit
Else
If Len(StrInput) = 0 Then
WScript.Echo "You did not enter anything. Try again"
Else

Dim userInput
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak strInput

End If
End If

loop