Membuat Komputer Kita Berbicara

Aslm wr. wb

Salam hangat buat sobat dunia explorasi dimanapun berada

Penasaran nggak sob dengan judulnya. Pasti penasaran kan emang komputer bisa berbicara. Dibilang nggak ya nggak dibilang bisa ya bisa. Oke, kalau bingung mendingan sobat sekalian coba perhatikan aja, langkah - langkah dibawah ini. Talk Less Do More.. Hehehe

• Buka notepad.

• Copas (copy dan paste di notepad ) script berikut ini  

          Dim msg, sapi 
          msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
          Set sapi = CreateObject ( "sapi.spvoice")
          sapi.Speak msg.

• Save as kemudian pilih all files lalu kasih nama PCbicara.vbs.

•  Selesai deh.

Coba sekarang sobat sekalian clik dua kali pada file PCbicara.vbs tarat..gimana keren dan menarik bukan. so tunggu apa lagi meluncurlah ke TKP (PC terdekat)


Semoga dapat bermanfaat bagi sobat sekalian