cara membuat komputer berbicara seperti di filim iron man pada windows 10

kode nya :

Dim speaks, speech, salam , username
username = CreateObject("WScript.Network").Username
If Hour(Time) < 12 Then
salam = "Good morning"
ElseIf Hour(Time) < 20 Then
salam = "Good afternoon"
Else
salam = "Good evening"
End If

speaks = salam + "ISI DENGAN KALIMAT SESUKA ANDA, PAKE BAHASA INGGRIS LEBIH BAGUS"
Set speech = CreateObject("sapi.spvoice")
speech.Speak speaks

masukan ke noteped save dengan format .vbs (contoh : suaraku.vbs)

letakan file vbs tersebut di sini :
C\USER\USERNAME ADMINISTRATOR\AppData\Roaming\microsoft\windows\startmenu\program\starup

selamat mencoba....

Terima Kasih Atas Kunjungannya, Anda Baru Saja Membaca Artikel yang berjudul cara membuat komputer berbicara seperti di filim iron man pada windows 10

Unknown
Jangan lupa di share .....!!!

Share this article :

Share on FB Tweet Share on G+ Submit to Digg